diff lisp/progmodes/python.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 468b7fa34d2c
children 0ad1fc06bfc8
line wrap: on
line diff
--- a/lisp/progmodes/python.el	Fri Oct 02 00:02:02 2009 +0000
+++ b/lisp/progmodes/python.el	Fri Oct 02 03:48:36 2009 +0000
@@ -1785,7 +1785,8 @@
     (with-output-to-temp-buffer (help-buffer)
       (with-current-buffer standard-output
  	;; Fixme: Is this actually useful?
-	(help-setup-xref (list 'python-describe-symbol symbol) (interactive-p))
+	(help-setup-xref (list 'python-describe-symbol symbol)
+			 (called-interactively-p 'interactive))
 	(set (make-local-variable 'comint-redirect-subvert-readonly) t)
 	(help-print-return-message))))
   (comint-redirect-send-command-to-process (format "emacs.ehelp(%S, %s)"
@@ -2797,7 +2798,7 @@
     (python-toggle-shells python-default-interpreter))
   (let ((args python-which-args))
     (when (and argprompt
-	       (interactive-p)
+	       (called-interactively-p 'interactive)
 	       (fboundp 'split-string))
       ;; TBD: Perhaps force "-i" in the final list?
       (setq args (split-string