Explorar o código

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 %!s(int64=13) %!d(string=hai) anos
pai
achega
47583ba1e4
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  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)