Mercurial > emacs

changeset 50295:b7e98fe2a99a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(cua-set-mark): Check pop-global-mark-quick-repeat.
author Kim F. Storm <storm@cua.dk>
date Mon, 24 Mar 2003 11:01:17 +0000
parents 701e15ed7818
children 156d2f800199
files lisp/emulation/cua-base.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emulation/cua-base.el	Mon Mar 24 11:01:00 2003 +0000
+++ b/lisp/emulation/cua-base.el	Mon Mar 24 11:01:17 2003 +0000
@@ -889,7 +889,8 @@
    ((eq last-command 'pop-to-mark-command)
     (setq this-command 'pop-to-mark-command)
     (pop-to-mark-command))
-   ((and (eq last-command 'pop-global-mark) (not arg))
+   ((and pop-global-mark-quick-repeat
+	 (eq last-command 'pop-global-mark) (not arg))
     (setq this-command 'pop-global-mark)
     (pop-global-mark))
    (arg