aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--generic/pg-user.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/pg-user.el b/generic/pg-user.el
index 463684c8..4adc3c39 100644
--- a/generic/pg-user.el
+++ b/generic/pg-user.el
@@ -1465,7 +1465,8 @@ assuming the undo-in-region behavior will apply if ARG is non-nil."
(message "Sending commands to prover...error."))
((and (input-pending-p) proof-shell-busy)
(proof-interrupt-process)
- (message "Sending commands to prover...interrupted."))
+ (message "Sending commands to prover...interrupted.")
+ (proof-shell-wait))
(t
(message "Sending commands to prover...done."))))
(setq proof-autosend-running nil))))