diff lisp/progmodes/js.el @ 105372:bd2966850aac

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

--- a/lisp/progmodes/js.el	Fri Oct 02 00:02:02 2009 +0000
+++ b/lisp/progmodes/js.el	Fri Oct 02 03:48:36 2009 +0000
@@ -1595,7 +1595,7 @@
   (let* ((syntactic-context (js--syntactic-context-from-pstate
                              (js--parse-state-at-point))))
 
-    (when (interactive-p)
+    (when (called-interactively-p 'interactive)
       (message "Syntactic context: %s" syntactic-context))
 
     syntactic-context))
@@ -2821,7 +2821,7 @@
       (setq num (js--js-funcall '(repl "_jsGC") (or keys [])))
 
       (setq js--js-last-gcs-done this-gcs-done)
-      (when (interactive-p)
+      (when (called-interactively-p 'interactive)
         (message "Cleaned %s entries" num))
 
       num)))
@@ -2835,7 +2835,7 @@
    (let* ((content-window (js--js-content-window
                            (js--get-js-context)))
           (result (js-eval content-window js)))
-     (when (interactive-p)
+     (when (called-interactively-p 'interactive)
        (message "%s" (js! "String" result)))
      result)))