changeset 61086:bf4917ef8f38

(python-preoutput-filter): Fix last change.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 29 Mar 2005 14:12:23 +0000
parents 6519d9f54165
children 386a445c2ae9
files lisp/progmodes/python.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/python.el	Tue Mar 29 13:59:41 2005 +0000
+++ b/lisp/progmodes/python.el	Tue Mar 29 14:12:23 2005 +0000
@@ -1127,8 +1127,8 @@
 	((string-match ".*\n" s)
 	 s)
 	((or (eq t (compare-strings s nil nil "_emacs_ok\n" nil (length s)))
-	     (eq t (compare-strings s nil nil "_emacs_out " nil
-				    (min (length "_emacs_out ") (length s)))))
+	     (let ((end (min (length "_emacs_out ") (length s))))
+	       (eq t (compare-strings s nil end "_emacs_out " nil end))))
 	 (setq python-preoutput-leftover s)
 	 "")
         (t s)))