mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(python-preoutput-filter): Fix last change.

Browse source
This commit is contained in:
Stefan Monnier 2005-03-29 14:12:23 +00:00
parent d702990801
commit 9f3f6a1854
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/progmodes/python.el
View file

@ -1127,8 +1127,8 @@ Don't save anything for STR matching `inferior-python-filter-regexp'."
((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)))