Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5ce52d05
Commit
5ce52d05
authored
Sep 14, 2014
by
Daniel Colascione
Browse files
* register.el (insert-register): Change default interactive insertion mode.
parent
36cac320
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
15 additions
and
2 deletions
+15
-2
etc/ChangeLog
etc/ChangeLog
+4
-0
etc/NEWS
etc/NEWS
+3
-0
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/register.el
lisp/register.el
+3
-2
No files found.
etc/ChangeLog
View file @
5ce52d05
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
...
...
etc/NEWS
View file @
5ce52d05
...
...
@@ -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
.
---
...
...
lisp/ChangeLog
View file @
5ce52d05
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.
...
...
lisp/register.el
View file @
5ce52d05
...
...
@@ -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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment