diff lisp/emacs-lisp/autoload.el @ 105372:bd2966850aac

Use `called-interactively-p' instead of `interactive-p'.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 02 Oct 2009 03:48:36 +0000
parents f2e56d1eff32
children fe4228529c23
line wrap: on
line diff
--- a/lisp/emacs-lisp/autoload.el	Fri Oct 02 00:02:02 2009 +0000
+++ b/lisp/emacs-lisp/autoload.el	Fri Oct 02 03:48:36 2009 +0000
@@ -505,7 +505,7 @@
          (no-autoloads (autoload-generate-file-autoloads file)))
     (if autoload-modified-buffers
         (if save-after (autoload-save-buffers))
-      (if (interactive-p)
+      (if (called-interactively-p 'interactive)
           (message "Autoload section for %s is up to date." file)))
     (if no-autoloads file)))