Mercurial > emacs

changeset 7901:28f9608f3c58

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mouse-drag-region): Bind last-command, not this-command.
author Karl Heuer <kwzh@gnu.org>
date Wed, 15 Jun 1994 03:55:42 +0000
parents 60795e826dad
children 22b9aaaf0302
files lisp/mouse.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mouse.el	Wed Jun 15 03:54:06 1994 +0000
+++ b/lisp/mouse.el	Wed Jun 15 03:55:42 1994 +0000
@@ -252,7 +252,7 @@
 	    (if (memq fun '(mouse-set-region mouse-set-point))
 		(if (not (= (overlay-start mouse-drag-overlay)
 			    (overlay-end mouse-drag-overlay)))
-		    (let (this-command)
+		    (let (last-command)
 		      (push-mark (overlay-start mouse-drag-overlay) t t)
 		      (goto-char (overlay-end mouse-drag-overlay))
 		      (copy-region-as-kill (point) (mark t)))