Re: Mark handling (Was: Changes to emacs/lisp/progmodes/grep.el)

[Richard Stallman]

    This then might be linked to another irritating thing I recently
    noticed: when double-clicking, the marked word is shown in region
    face, but reverts to normal face immediately.  The next double
    click sets region face semi permanently (till doing something
    else).  The next double click again only blinks region face, and
    so on.

Does this fix it?

*** mouse.el    15 Jun 2004 22:47:00 -0400      1.248
--- mouse.el    07 Jul 2004 11:56:19 -0400      
***************
*** 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)))