From: Barry Warsaw Date: Fri, 25 Sep 1998 19:40:10 +0000 (+0000) Subject: (py-comint-output-filter-function): Horrible kludgearound for making X-Git-Tag: v1.5.2a2~249 X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=4f94c7387954129df964de202c5c27beb2d0f398;p=python (py-comint-output-filter-function): Horrible kludgearound for making the de-queing of exec files work for NT XEmacs 21.0. --- diff --git a/Misc/python-mode.el b/Misc/python-mode.el index 96da5de7e8..e96e671641 100644 --- a/Misc/python-mode.el +++ b/Misc/python-mode.el @@ -1053,7 +1053,10 @@ comint believe the user typed this string so that (defun py-comint-output-filter-function (string) "Watch output for Python prompt and exec next file waiting in queue. This function is appropriate for `comint-output-filter-functions'." - (when (and (string-equal ">>> " string) + (when (and (or (string-equal string ">>> ") + ;; NT XEmacs 21.0 kludge + (and (>= (length string) 5) + (string-equal (substring string -5) "\n>>> "))) py-file-queue) (py-safe (delete-file (car py-file-queue))) (setq py-file-queue (cdr py-file-queue))