aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/register.el4
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6c7d61dff48..a15e512086d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12013-10-08 Bastien Guerry <bzg@gnu.org>
2
3 * register.el (insert-register): Fix 2013-10-07T01:28:34Z!sdl.web@gmail.com.
4
12013-10-08 Stefan Monnier <monnier@iro.umontreal.ca> 52013-10-08 Stefan Monnier <monnier@iro.umontreal.ca>
2 6
3 * progmodes/perl-mode.el: Use lexical-binding. 7 * progmodes/perl-mode.el: Use lexical-binding.
diff --git a/lisp/register.el b/lisp/register.el
index 88b309b2d89..2e22502cfeb 100644
--- a/lisp/register.el
+++ b/lisp/register.el
@@ -395,8 +395,8 @@ If optional second arg is non-nil, puts mark before and point after.
395Interactively, second arg is non-nil if prefix arg is supplied." 395Interactively, second arg is non-nil if prefix arg is supplied."
396 (interactive (progn 396 (interactive (progn
397 (barf-if-buffer-read-only) 397 (barf-if-buffer-read-only)
398 (register-read-with-preview "Insert register: ") 398 (list (register-read-with-preview "Insert register: ")
399 current-prefix-arg)) 399 current-prefix-arg)))
400 (push-mark) 400 (push-mark)
401 (let ((val (get-register register))) 401 (let ((val (get-register register)))
402 (cond 402 (cond