[Emacs-diffs] Changes to emacs/lisp/emulation/cua-base.el

[Kim F. Storm]

Index: emacs/lisp/emulation/cua-base.el
diff -c emacs/lisp/emulation/cua-base.el:1.21 
emacs/lisp/emulation/cua-base.el:1.22
*** emacs/lisp/emulation/cua-base.el:1.21       Fri Mar 21 19:18:12 2003
--- emacs/lisp/emulation/cua-base.el    Mon Mar 24 06:01:17 2003
***************
*** 889,895 ****
     ((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))
      (setq this-command 'pop-global-mark)
      (pop-global-mark))
     (arg
--- 889,896 ----
     ((eq last-command 'pop-to-mark-command)
      (setq this-command 'pop-to-mark-command)
      (pop-to-mark-command))
!    ((and pop-global-mark-quick-repeat
!        (eq last-command 'pop-global-mark) (not arg))
      (setq this-command 'pop-global-mark)
      (pop-global-mark))
     (arg