aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2009-07-17 23:27:28 +0000
committerChong Yidong2009-07-17 23:27:28 +0000
commit6f3a268219ecb338e7d25a0d2cdbfc6240d76271 (patch)
tree5d2cbe049e87914b2bd54f9809c79d79fbf22eb5
parent6c6a75d5824928e4aa66de9f89d74cb38102e4dc (diff)
downloademacs-6f3a268219ecb338e7d25a0d2cdbfc6240d76271.tar.gz
emacs-6f3a268219ecb338e7d25a0d2cdbfc6240d76271.zip
Fix last change.
-rw-r--r--lisp/mouse.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 9e25078e72a..168a82e1742 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1373,7 +1373,7 @@ before inserting the text."
1373 (when select-active-regions 1373 (when select-active-regions
1374 ;; Without this, confusing things happen upon e.g. inserting into 1374 ;; Without this, confusing things happen upon e.g. inserting into
1375 ;; the middle of an active region. 1375 ;; the middle of an active region.
1376 (deactivate-mark t)) 1376 (deactivate-mark))
1377 (or mouse-yank-at-point (mouse-set-point click)) 1377 (or mouse-yank-at-point (mouse-set-point click))
1378 (setq this-command 'yank) 1378 (setq this-command 'yank)
1379 (setq mouse-selection-click-count 0) 1379 (setq mouse-selection-click-count 0)
@@ -1390,7 +1390,7 @@ regardless of where you click."
1390 (when select-active-regions 1390 (when select-active-regions
1391 ;; Without this, confusing things happen upon e.g. inserting into 1391 ;; Without this, confusing things happen upon e.g. inserting into
1392 ;; the middle of an active region. 1392 ;; the middle of an active region.
1393 (deactivate-mark t)) 1393 (deactivate-mark))
1394 (or mouse-yank-at-point (mouse-set-point click)) 1394 (or mouse-yank-at-point (mouse-set-point click))
1395 (let ((primary (x-get-selection 'PRIMARY))) 1395 (let ((primary (x-get-selection 'PRIMARY)))
1396 (if primary 1396 (if primary