diff --git a/lisp/simple.el b/lisp/simple.el index f69efad6872..dfca44cffc6 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -1094,7 +1094,7 @@ system cut and paste." (goto-char opoint) ;; If user quit, deactivate the mark ;; as C-g would as a command. - (and quit-flag transient-mark-mode mark-active + (and quit-flag mark-active (progn (message "foo") ;XXX what is this here for? --roland (deactivate-mark))))