aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Aspinall1999-08-20 13:55:52 +0000
committerDavid Aspinall1999-08-20 13:55:52 +0000
commit2361dbd516e3a4c5b936d43bec09cd0a5d0c14c6 (patch)
treeec6e3f35271876dccf977368c76809f568601bd9
parent0d3d489edff3a7659d2bdfc0e0b2dcaf27db6d59 (diff)
Fix for XEmacs 21
-rw-r--r--generic/proof-shell.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/generic/proof-shell.el b/generic/proof-shell.el
index b4949067..3c4bfc22 100644
--- a/generic/proof-shell.el
+++ b/generic/proof-shell.el
@@ -894,9 +894,13 @@ assistant."
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar proof-shell-insert-space-fudge
- (if (string-match "XEmacs" emacs-version) "" " ")
+ (cond
+ ((string-match "21.*XEmacs" emacs-version) " ")
+ ((string-match "XEmacs" emacs-version) "")
+ (t " "))
"String to insert after setting proof marker to prevent it moving.
-Fixes a bug/problem with FSF Emacs.")
+Allows for a difference between different versions of comint across
+different Emacs versions.")
(defun proof-shell-insert (string)
"Insert STRING at the end of the proof shell, call comint-send-input.