Browse Source

org.el (org-read-date): Let-bind `mouse-autoselect-window' to nil

* org.el (org-read-date): Let-bind `mouse-autoselect-window'
to nil so that the mouse doesn't jump when the option is set
to t globally.

Thanks to E Sabof for reporting this.
Bastien Guerry 12 years ago
parent
commit
47583ba1e4
1 changed files with 1 additions and 0 deletions
  1. 1 0
      lisp/org.el

+ 1 - 0
lisp/org.el

@@ -15337,6 +15337,7 @@ user."
 		    (setcar (nthcdr 1 org-defdecode) 59)
 		    (setq org-def (apply 'encode-time org-defdecode)
 			  org-defdecode (decode-time org-def)))))
+	 (mouse-autoselect-window nil) ; Don't let the mouse jump
 	 (calendar-frame-setup nil)
 	 (calendar-setup nil)
 	 (calendar-move-hook nil)