[elpa] 01/16: * packages/register-list/register-list.el (register-list): Pass arg to called-interactively-p.

[Stefan Monnier]

monnier pushed a commit to branch master
in repository elpa.

commit d229026e3ae6fc0d2443ac66e77f54ff21aae409
Author: Stefan Monnier <address@hidden>
Date:   Wed Oct 15 16:26:11 2014 -0400

    * packages/register-list/register-list.el (register-list): Pass arg to
    called-interactively-p.
---
 packages/register-list/register-list.el |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/packages/register-list/register-list.el 
b/packages/register-list/register-list.el
index c93e479..1bbcb72 100755
--- a/packages/register-list/register-list.el
+++ b/packages/register-list/register-list.el
@@ -396,7 +396,7 @@ The list is displayed in a buffer named `*Register List*' in
   (register-list-mode)
   (goto-char (point-min))
   (line-move 2 t)
-  (if (called-interactively-p)
+  (if (called-interactively-p 'interactive)
       (message "[d]elete  [e/E]dit key/value  RET:jump/copy  [FNRSW]:select 
type  ?:help")
     (message "Register type: %s" register-list-current-type)))