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.
This commit is contained in:
Bastien Guerry 2013-01-06 12:37:18 +01:00
parent 129ecf99fa
commit 47583ba1e4
1 changed files with 1 additions and 0 deletions

View File

@ -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)