aboutsummaryrefslogtreecommitdiffhomepage
path: root/generic/proof-shell.el
diff options
context:
space:
mode:
authorGravatar Clément Pit--Claudel <clement.pitclaudel@live.com>2016-06-10 17:15:29 -0400
committerGravatar Clément Pit--Claudel <clement.pitclaudel@live.com>2016-06-10 17:37:01 -0400
commit493211dbd924520e6842f3e5d7c8fd1b3cbf1485 (patch)
treec2128f9a2cf99714038a17522bc9ae4aa13a057b /generic/proof-shell.el
parentb4ed3cf3ce09c397115e7f75372245724410a187 (diff)
Reset proof-script-buffer to nil if -ready-prover fails
Fixes #65
Diffstat (limited to 'generic/proof-shell.el')
-rw-r--r--generic/proof-shell.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/proof-shell.el b/generic/proof-shell.el
index 4f89963e..64eee4c8 100644
--- a/generic/proof-shell.el
+++ b/generic/proof-shell.el
@@ -379,7 +379,10 @@ process command."
(setq proof-shell-buffer (get-buffer (concat "*" proc "*")))
(unless (proof-shell-live-buffer)
- ;; Give error now if shell buffer isn't live (process exited)
+ ;; Give error now if shell buffer isn't live (process exited). We also
+ ;; set the process filter to nil to avoid processing error messages
+ ;; related to the process exit.
+ (set-process-filter (get-buffer-process proof-shell-buffer) nil)
(setq proof-shell-buffer nil)
(error "Starting process: %s..failed" prog-command-line)))