* register.el (insert-register): Fix 2013-10-07T01:28:34Z!sdl.web@gmail.com.

This commit is contained in:
Bastien Guerry 2013-10-08 08:02:20 +02:00
parent 1142cc2abf
commit 5ea75d2335
2 changed files with 6 additions and 2 deletions

View file

@ -1,3 +1,7 @@
2013-10-08 Bastien Guerry <bzg@gnu.org>
* register.el (insert-register): Fix 2013-10-07T01:28:34Z!sdl.web@gmail.com.
2013-10-08 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/perl-mode.el: Use lexical-binding.

View file

@ -395,8 +395,8 @@ If optional second arg is non-nil, puts mark before and point after.
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