[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/mouse.el [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/mouse.el [lexbind] |
Date: |
Fri, 16 Jul 2004 23:11:45 -0400 |
Index: emacs/lisp/mouse.el
diff -c emacs/lisp/mouse.el:1.241.2.6 emacs/lisp/mouse.el:1.241.2.7
*** emacs/lisp/mouse.el:1.241.2.6 Tue Jul 6 10:17:17 2004
--- emacs/lisp/mouse.el Sat Jul 17 02:49:46 2004
***************
*** 625,631 ****
(defun mouse-set-region-1 ()
;; Set transient-mark-mode for a little while.
! (setq transient-mark-mode (or transient-mark-mode 'only))
(setq mouse-last-region-beg (region-beginning))
(setq mouse-last-region-end (region-end))
(setq mouse-last-region-tick (buffer-modified-tick)))
--- 625,632 ----
(defun mouse-set-region-1 ()
;; Set transient-mark-mode for a little while.
! (if (memq transient-mark-mode '(nil identity))
! (setq transient-mark-mode 'only))
(setq mouse-last-region-beg (region-beginning))
(setq mouse-last-region-end (region-end))
(setq mouse-last-region-tick (buffer-modified-tick)))