summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2006-08-28 21:13:34 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2006-08-28 21:13:34 +0000
commit6cc91c85a090cbe73d773f69a68d9da7fd2f7a07 (patch)
tree0f01df3c27fa9d45451ab67df8008aa24a47d9dd /lisp
parent81e213dc7cb42ca0195a1b81d5cb1d50164d9182 (diff)
downloademacs-6cc91c85a090cbe73d773f69a68d9da7fd2f7a07.tar.gz
emacs-6cc91c85a090cbe73d773f69a68d9da7fd2f7a07.tar.bz2
emacs-6cc91c85a090cbe73d773f69a68d9da7fd2f7a07.zip
(python-send-command): Don't wait for the command
to terminate. Don't fiddle with compilation-parsing-end.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog9
-rw-r--r--lisp/progmodes/python.el13
2 files changed, 16 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9c01cd76a45..c0797ec968a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,12 @@
+2006-08-28 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * progmodes/python.el (python-send-command): Don't wait for the command
+ to terminate. Don't fiddle with compilation-parsing-end.
+
2006-08-28 Chong Yidong <cyd@stupidchicken.com>
- * emacs-lisp/checkdoc.el (checkdoc-file-comments-engine): Insert
- commentary after first line summary.
+ * emacs-lisp/checkdoc.el (checkdoc-file-comments-engine):
+ Insert commentary after first line summary.
* woman.el (woman-follow): New function, based on `man-follow'.
(woman-mode-map): Use it.
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index c38a6e82f83..4821376ec7b 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -1373,11 +1373,16 @@ COMMAND should be a single statement."
(let ((end (marker-position (process-mark (python-proc)))))
(with-current-buffer python-buffer (goto-char (point-max)))
(compilation-forget-errors)
- ;; Must wait until this has completed before re-setting variables below.
- (python-send-receive (concat command "; print '_emacs_out ()'"))
+ (python-send-string command)
(with-current-buffer python-buffer
- (set-marker compilation-parsing-end end)
- (setq compilation-last-buffer (current-buffer)))))
+ (setq compilation-last-buffer (current-buffer)))
+ ;; No idea what this is for but it breaks the call to
+ ;; compilation-fake-loc in python-send-region. -- Stef
+ ;; Must wait until this has completed before re-setting variables below.
+ ;; (python-send-receive "print '_emacs_out ()'")
+ ;; (with-current-buffer python-buffer
+ ;; (set-marker compilation-parsing-end end))
+ ))
(defun python-send-region (start end)
"Send the region to the inferior Python process."