[Emacs-diffs] Changes to emacs/lisp/mouse.el

[Richard M . Stallman]

Index: emacs/lisp/mouse.el
diff -c emacs/lisp/mouse.el:1.247 emacs/lisp/mouse.el:1.248
*** emacs/lisp/mouse.el:1.247   Fri May 28 21:06:26 2004
--- emacs/lisp/mouse.el Mon Jun 21 03:16:28 2004
***************
*** 625,631 ****
  
  (defun mouse-set-region-1 ()
    ;; Set transient-mark-mode for a little while.
!   (setq transient-mark-mode (or transient-mark-mode 'lambda))
    (setq mouse-last-region-beg (region-beginning))
    (setq mouse-last-region-end (region-end))
    (setq mouse-last-region-tick (buffer-modified-tick)))
--- 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)))