mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

(transient-mark-mode): New command.

Browse Source
This commit is contained in:
Richard M. Stallman 1993-05-15 18:47:18 +00:00
parent bc0db68d47
commit e23c2c217e
1 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/simple.el
View File

@ -1289,6 +1289,18 @@ and it reactivates the mark."
(set-mark (point))
(goto-char omark)
nil))
(defun transient-mark-mode (arg)
"Toggle Transient Mark mode.
With arg, turn Transient Mark mode on if and only if arg is positive.
In Transient Mark mode, changing the buffer \"deactivates\" the mark.
While the mark is active, the region is highlighted."
(interactive "P")
(setq transient-mark-mode
(if (null arg)
(not transient-mark-mode)
(> (prefix-numeric-value arg) 0))))
(defvar next-line-add-newlines t
"*If non-nil, `next-line' inserts newline to avoid `end of buffer' error.")