(py-comint-output-filter-function): Horrible kludgearound for making

the de-queing of exec files work for NT XEmacs 21.0.
This commit is contained in:
Barry Warsaw 1998-09-25 19:40:10 +00:00
parent 67906af811
commit 4f94c73879
1 changed files with 4 additions and 1 deletions

View File

@ -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))