Mercurial > emacs
diff lisp/term/sun-mouse.el @ 65100:f8a4e96b69d3
(current-global-mousemap, current-local-mousemap): Declare them before use.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Wed, 24 Aug 2005 14:41:27 +0000 |
parents | 34bd8e434dd7 |
children | 067115a6e738 2d92f5c9d6ae |
line wrap: on
line diff
--- a/lisp/term/sun-mouse.el Wed Aug 24 14:31:17 2005 +0000 +++ b/lisp/term/sun-mouse.el Wed Aug 24 14:41:27 2005 +0000 @@ -58,6 +58,11 @@ "Returns a new mousemap." (cons 'mousemap nil)) +;;; initialize mouse maps +(defvar current-global-mousemap (make-mousemap)) +(defvar current-local-mousemap nil) +(make-variable-buffer-local 'current-local-mousemap) + (defun copy-mousemap (mousemap) "Return a copy of mousemap." (copy-alist mousemap)) @@ -668,13 +673,6 @@ (if stuffstring (send-string-to-terminal stuffstring)) (send-string-to-terminal "\033[2t") ; To close EmacsTool window. (run-hooks 'suspend-resume-hook)) -;;; -;;; initialize mouse maps -;;; - -(make-variable-buffer-local 'current-local-mousemap) -(setq-default current-local-mousemap nil) -(defvar current-global-mousemap (make-mousemap)) (provide 'sun-mouse) (provide 'term/sun-mouse) ; have to (require 'term/sun-mouse)