From 5ea75d23351858b406ebcbfadcdc3b58779aa792 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 8 Oct 2013 08:02:20 +0200 Subject: [PATCH] * register.el (insert-register): Fix 2013-10-07T01:28:34Z!sdl.web@gmail.com. --- lisp/ChangeLog | 4 ++++ lisp/register.el | 4 ++-- 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 @@ +2013-10-08 Bastien Guerry + + * register.el (insert-register): Fix 2013-10-07T01:28:34Z!sdl.web@gmail.com. + 2013-10-08 Stefan Monnier * 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. 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 -- 2.39.5