aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes
diff options
context:
space:
mode:
authorFabián Ezequiel Gallina2012-05-17 00:02:57 -0300
committerFabián Ezequiel Gallina2012-05-17 00:02:57 -0300
commitfc87f759ed9952e601e05cbd2229a1b3aec80158 (patch)
tree85b10c84487aab97ed913ae92770aadfc23146e1 /lisp/progmodes
parentdb1497be1449738eeaa4f47d960d738316294331 (diff)
downloademacs-fc87f759ed9952e601e05cbd2229a1b3aec80158.tar.gz
emacs-fc87f759ed9952e601e05cbd2229a1b3aec80158.zip
Fixed called-interactively-p invocation.
Diffstat (limited to 'lisp/progmodes')
-rw-r--r--lisp/progmodes/python.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index 5a3dc4bb1fb..78b541d8a0e 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -1023,7 +1023,7 @@ commands.)"
1023 "Send STRING to inferior Python process." 1023 "Send STRING to inferior Python process."
1024 (interactive "sPython command: ") 1024 (interactive "sPython command: ")
1025 (let ((process (or process (python-shell-get-or-create-process)))) 1025 (let ((process (or process (python-shell-get-or-create-process))))
1026 (when (called-interactively-p) 1026 (when (called-interactively-p 'interactive)
1027 (message (format "Sent: %s..." string))) 1027 (message (format "Sent: %s..." string)))
1028 (comint-send-string process string) 1028 (comint-send-string process string)
1029 (when (or (not (string-match "\n$" string)) 1029 (when (or (not (string-match "\n$" string))