Mercurial > emacs
diff lisp/simple.el @ 92240:99e2bfb053c7
(set-mark-command): Deactivate mark on second C-SPC C-SPC
when using transient-mark-mode.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 26 Feb 2008 19:41:53 +0000 |
parents | 07b62dd00afa |
children | 3fb4cc86f03e |
line wrap: on
line diff
--- a/lisp/simple.el Tue Feb 26 18:48:00 2008 +0000 +++ b/lisp/simple.el Tue Feb 26 19:41:53 2008 +0000 @@ -3499,6 +3499,9 @@ mark-active (null transient-mark-mode)) (setq transient-mark-mode 'lambda) (message "Transient-mark-mode temporarily enabled")) + ((and (eq last-command 'set-mark-command) + transient-mark-mode) + (deactivate-mark)) (t (push-mark-command nil)))) @@ -4598,7 +4601,6 @@ (princ "." t)) (defvaralias 'indicate-unused-lines 'indicate-empty-lines) -(defvaralias 'default-indicate-unused-lines 'default-indicate-empty-lines) (defun toggle-truncate-lines (&optional arg) "Toggle whether to fold or truncate long lines for the current buffer.