[Emacs-diffs] trunk r114575: * register.el (insert-register): Fix revno:114543.

[Bastien Guerry]

------------------------------------------------------------
revno: 114575
revision-id: address@hidden
parent: address@hidden
committer: Bastien Guerry <address@hidden>
branch nick: trunk
timestamp: Tue 2013-10-08 08:02:20 +0200
message:
  * register.el (insert-register): Fix revno:114543.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/register.el               register.el-20091113204419-o5vbwnq5f7feedwu-104

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-10-08 05:10:10 +0000
+++ b/lisp/ChangeLog    2013-10-08 06:02:20 +0000
@@ -1,3 +1,7 @@
+2013-10-08  Bastien Guerry  <address@hidden>
+
+       * register.el (insert-register): Fix revno:114543.
+
 2013-10-08  Stefan Monnier  <address@hidden>
 
        * progmodes/perl-mode.el: Use lexical-binding.

=== modified file 'lisp/register.el'
--- a/lisp/register.el  2013-10-07 03:34:26 +0000
+++ b/lisp/register.el  2013-10-08 06:02:20 +0000
@@ -395,8 +395,8 @@
 Interactively, second arg is non-nil if prefix arg is supplied."
   (interactive (progn
                 (barf-if-buffer-read-only)
-                (register-read-with-preview "Insert register: ")
-                current-prefix-arg))
+                (list (register-read-with-preview "Insert register: ")
+                      current-prefix-arg)))
   (push-mark)
   (let ((val (get-register register)))
     (cond