diff options
author | Glenn Morris <rgm@gnu.org> | 2014-02-02 16:40:49 -0800 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2014-02-02 16:40:49 -0800 |
commit | 6a6b8e405e82dfcc506bb926f742c9fa1f5b080b (patch) | |
tree | 5469241861b6b0501fdbce2486caec0789053e2b /lisp/register.el | |
parent | 5dca7759a78e8b2a50308a9d5f276799ec46c975 (diff) |
Be more consistent in using register-read-with-preview to read registers
* frameset.el (frameset-to-register):
* kmacro.el (kmacro-to-register):
* register.el (increment-register):
* calc/calc-yank.el (calc-copy-to-register, calc-insert-register)
(calc-append-to-register, calc-prepend-to-register):
* play/gametree.el (gametree-layout-to-register)
(gametree-apply-register-layout):
* textmodes/picture.el (picture-clear-rectangle-to-register)
(picture-yank-rectangle-from-register):
* vc/emerge.el (emerge-combine-versions-register):
Use register-read-with-preview to read registers.
* cedet/semantic/senator.el (senator-copy-tag-to-register):
Use register-read-with-preview, if available.
* calculator.el, emulation/viper-cmd.el: Comments.
Diffstat (limited to 'lisp/register.el')
-rw-r--r-- | lisp/register.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/register.el b/lisp/register.el index 3b65c648d98..1a42d0bf376 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -296,8 +296,11 @@ If REGISTER contains a number, add `prefix-numeric-value' of PREFIX to it. If REGISTER is empty or if it contains text, call -`append-to-register' with `delete-flag' set to PREFIX." - (interactive "P\ncIncrement register: ") +`append-to-register' with `delete-flag' set to PREFIX. + +Interactively, reads the register using `register-read-with-preview'." + (interactive (list current-prefix-arg + (register-read-with-preview "Increment register: "))) (let ((register-val (get-register register))) (cond ((numberp register-val) |