summaryrefslogtreecommitdiff
path: root/helm.el
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2016-06-17 12:07:51 +0200
committerThierry Volpiatto <thierry.volpiatto@gmail.com>2016-06-17 12:07:51 +0200
commitd53880f23efb5fd822de1c557bca43c87b676f18 (patch)
treee15cd150488c1408476a079e2012deb523454f54 /helm.el
parent38b12a63e045b5adf48f8a1009bba8a16d9c3f03 (diff)
Prevent mouse jumping to the upper-right hand corner of the frame (#1538).
* helm.el (helm-internal): Do it.
Diffstat (limited to 'helm.el')
-rw-r--r--helm.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/helm.el b/helm.el
index af0c8be0..b326192c 100644
--- a/helm.el
+++ b/helm.el
@@ -1889,7 +1889,11 @@ ANY-KEYMAP ANY-DEFAULT ANY-HISTORY See `helm'."
(helm-log "any-history = %S" any-history)
(setq helm--prompt (or any-prompt "pattern: "))
(let ((non-essential t)
+ ;; Prevent mouse jumping to the upper-right
+ ;; hand corner of the frame (#1538).
mode-line-in-non-selected-windows
+ mouse-autoselect-window
+ focus-follows-mouse
(input-method-verbose-flag helm-input-method-verbose-flag)
(old--cua cua-mode)
(helm--maybe-use-default-as-input