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.