diff options
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 1094 | (goto-char opoint) | 1094 | (goto-char opoint) |
| 1095 | ;; If user quit, deactivate the mark | 1095 | ;; If user quit, deactivate the mark |
| 1096 | ;; as C-g would as a command. | 1096 | ;; as C-g would as a command. |
| 1097 | (and quit-flag transient-mark-mode mark-active | 1097 | (and quit-flag mark-active |
| 1098 | (progn | 1098 | (progn |
| 1099 | (message "foo") ;XXX what is this here for? --roland | 1099 | (message "foo") ;XXX what is this here for? --roland |
| 1100 | (deactivate-mark)))) | 1100 | (deactivate-mark)))) |