diff options
| author | Makarius Wenzel | 1999-08-20 14:19:38 +0000 |
|---|---|---|
| committer | Makarius Wenzel | 1999-08-20 14:19:38 +0000 |
| commit | 3b2c0bc25ceaa365257f3a47117a8c58e4bb1f82 (patch) | |
| tree | 4bb9683e424413110e987def0ca3b5ba13d9614e | |
| parent | c26c52295c62fc31eedc09c4861cd6dd7ee379a8 (diff) | |
prefer proof-shell-interrupt-regexp over proof-shell-error-regexp
(interrupts may appear like error messages in Isabelle/Isar);
| -rw-r--r-- | generic/proof-shell.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/proof-shell.el b/generic/proof-shell.el index 3c4bfc22..e7d73e2b 100644 --- a/generic/proof-shell.el +++ b/generic/proof-shell.el @@ -840,14 +840,14 @@ This function - it can return one of 4 things: 'error, 'interrupt, should be inserted into the script buffer and sent back to the proof assistant." (cond + ((string-match proof-shell-interrupt-regexp string) + 'interrupt) + ((string-match proof-shell-error-regexp string) (cons 'error (proof-shell-strip-annotations (substring string (match-beginning 0))))) - ((string-match proof-shell-interrupt-regexp string) - 'interrupt) - ((and proof-shell-abort-goal-regexp (string-match proof-shell-abort-goal-regexp string)) (proof-clean-buffer proof-goals-buffer) |
