diff options
author | Barry Warsaw <barry@python.org> | 1998-09-25 19:40:10 (GMT) |
---|---|---|
committer | Barry Warsaw <barry@python.org> | 1998-09-25 19:40:10 (GMT) |
commit | 4f94c7387954129df964de202c5c27beb2d0f398 (patch) | |
tree | 9c1f3c8a9efc4942a206104a702a751c5e6135de /Misc | |
parent | 67906af81148617da6638469e97085e7485b17a0 (diff) | |
download | cpython-4f94c7387954129df964de202c5c27beb2d0f398.zip cpython-4f94c7387954129df964de202c5c27beb2d0f398.tar.gz cpython-4f94c7387954129df964de202c5c27beb2d0f398.tar.bz2 |
(py-comint-output-filter-function): Horrible kludgearound for making
the de-queing of exec files work for NT XEmacs 21.0.
Diffstat (limited to 'Misc')
-rw-r--r-- | Misc/python-mode.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Misc/python-mode.el b/Misc/python-mode.el index 96da5de..e96e671 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)) |