summaryrefslogtreecommitdiff
path: root/lisp/register.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2014-02-02 16:40:49 -0800
committerGlenn Morris <rgm@gnu.org>2014-02-02 16:40:49 -0800
commit6a6b8e405e82dfcc506bb926f742c9fa1f5b080b (patch)
tree5469241861b6b0501fdbce2486caec0789053e2b /lisp/register.el
parent5dca7759a78e8b2a50308a9d5f276799ec46c975 (diff)
downloademacs-6a6b8e405e82dfcc506bb926f742c9fa1f5b080b.tar.gz
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.el7
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)