From 6cc91c85a090cbe73d773f69a68d9da7fd2f7a07 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 28 Aug 2006 21:13:34 +0000 Subject: [PATCH] (python-send-command): Don't wait for the command to terminate. Don't fiddle with compilation-parsing-end. --- lisp/ChangeLog | 9 +++++++-- lisp/progmodes/python.el | 13 +++++++++---- 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 + + * 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 - * 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." -- 2.39.2