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

[Richard M . Stallman]

Index: emacs/lisp/mouse.el
diff -c emacs/lisp/mouse.el:1.255 emacs/lisp/mouse.el:1.256
*** emacs/lisp/mouse.el:1.255   Mon Nov  1 13:50:49 2004
--- emacs/lisp/mouse.el Thu Nov  4 10:02:38 2004
***************
*** 1068,1075 ****
      (unless ignore
        ;; For certain special keys, delete the region.
        (if (member key mouse-region-delete-keys)
!         (delete-region (overlay-start mouse-drag-overlay)
!                        (overlay-end mouse-drag-overlay))
        ;; Otherwise, unread the key so it gets executed normally.
        (setq unread-command-events
              (nconc events unread-command-events))))
--- 1068,1074 ----
      (unless ignore
        ;; For certain special keys, delete the region.
        (if (member key mouse-region-delete-keys)
!         (delete-region (mark t) (point))
        ;; Otherwise, unread the key so it gets executed normally.
        (setq unread-command-events
              (nconc events unread-command-events))))