Use `called-interactively-p' instead of `interactive-p'.

[bpt/emacs.git] / lisp / recentf.el

diff --git a/lisp/recentf.el b/lisp/recentf.el
index 2a6955f..81485a3 100644 (file)
--- a/lisp/recentf.el
+++ b/lisp/recentf.el
@@ -1357,7 +1357,7 @@ that were operated on recently."
       (dolist (hook recentf-used-hooks)
         (apply hook-setup hook)))
     (run-hooks 'recentf-mode-hook)
-    (when (interactive-p)
+    (when (called-interactively-p 'interactive)
       (message "Recentf mode %sabled" (if recentf-mode "en" "dis"))))
   recentf-mode)