diff options
author | Daniel Colascione <dancol@dancol.org> | 2014-09-14 16:11:52 -0700 |
---|---|---|
committer | Daniel Colascione <dancol@dancol.org> | 2014-09-14 16:11:52 -0700 |
commit | 5ce52d05c93e0c006bbd145b938aa9fab7dfcb8d (patch) | |
tree | 467ced2bf8b3819b4988664d747ff37313a559c6 | |
parent | 36cac3209313d849f3eef6e4c7278eb018817e23 (diff) |
* register.el (insert-register): Change default interactive insertion mode.
-rw-r--r-- | etc/ChangeLog | 4 | ||||
-rw-r--r-- | etc/NEWS | 3 | ||||
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/register.el | 5 |
4 files changed, 15 insertions, 2 deletions
diff --git a/etc/ChangeLog b/etc/ChangeLog index 42bd7cb40d..a57605be64 100644 --- a/etc/ChangeLog +++ b/etc/ChangeLog @@ -1,3 +1,7 @@ +2014-09-14 Daniel Colascione <dancol@dancol.org> + + * NEWS: Mention changes to `insert-register' + 2014-09-13 Christopher Schmidt <ch@ristopher.com> * NEWS: Mention nil `calendar-mode-line-format' will not modify @@ -49,6 +49,9 @@ Use './configure PKG_CONFIG=/full/name/of/pkg-config' if you need to. * Changes in Emacs 24.5 +** `insert-register' now leaves point after the inserted text +when called interactively. A prefix argument toggles this behavior. + ** New var `truncate-string-ellipsis' to choose how to indicate truncation. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 35df2c5bf1..b9990cbe59 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-09-14 Daniel Colascione <dancol@dancol.org> + + * register.el (insert-register): Change default interactive + insertion mode. + 2014-09-14 Michael Albinus <michael.albinus@gmx.de> * net/tramp-cache.el (tramp-flush-file-function): Simplify check. diff --git a/lisp/register.el b/lisp/register.el index eb3c71afec..ffa3c954ed 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -425,13 +425,14 @@ Interactively, reads the register using `register-read-with-preview'." "Insert contents of register REGISTER. (REGISTER is a character.) Normally puts point before and mark after the inserted text. If optional second arg is non-nil, puts mark before and point after. -Interactively, second arg is non-nil if prefix arg is supplied. +Interactively, second arg is nil if prefix arg is supplied and t +otherwise. Interactively, reads the register using `register-read-with-preview'." (interactive (progn (barf-if-buffer-read-only) (list (register-read-with-preview "Insert register: ") - current-prefix-arg))) + (not current-prefix-arg)))) (push-mark) (let ((val (get-register register))) (cond |