[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp simple.el
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] emacs/lisp simple.el |
Date: |
Sat, 21 Mar 2009 18:29:25 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Eli Zaretskii <eliz> 09/03/21 18:29:25
Modified files:
lisp : simple.el
Log message:
(handle-shift-selection): Doc fix. (Bug#2738)
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/simple.el?cvsroot=emacs&r1=1.977&r2=1.978
Patches:
Index: simple.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/simple.el,v
retrieving revision 1.977
retrieving revision 1.978
diff -u -b -r1.977 -r1.978
--- simple.el 19 Mar 2009 14:45:05 -0000 1.977
+++ simple.el 21 Mar 2009 18:29:25 -0000 1.978
@@ -3747,18 +3747,21 @@
nil))
(defun handle-shift-selection (&optional deactivate)
- "Check for shift translation, and operate on the mark accordingly.
+ "Activate or deactivate the mark depending on whether the
+current command was invoked through ``shift translation.''
+
+\(See `this-command-keys-shift-translated' for the meaning of
+shift translation.)
+
This is called whenever a command with a `^' character in its
`interactive' spec is invoked while `shift-select-mode' is
non-nil.
-If the command was invoked through shift-translation, set the
+If the command was invoked through shift translation, set the
mark and activate the region temporarily, unless it was already
-set in this way. If the command was invoked without
-shift-translation and a region is temporarily active, deactivate
-the mark.
-
-With optional arg DEACTIVATE, only perform region deactivation."
+set in this way. If the command was invoked without shift
+translation, or if the optional argument DEACTIVATE is non-nil,
+deactivate the mark if the region is temporarily active."
(cond ((and this-command-keys-shift-translated
(null deactivate))
(unless (and mark-active