aboutsummaryrefslogtreecommitdiff
path: root/generic
diff options
context:
space:
mode:
authorDavid Aspinall2001-07-23 09:17:12 +0000
committerDavid Aspinall2001-07-23 09:17:12 +0000
commitd50890514cdf43f9f8f6236143eda8adf10c6e45 (patch)
tree5e452a1c5742bc73c40a0a866c6f221762e75643 /generic
parent7f649a353ae3be418d95ddf18791a054852f25d0 (diff)
Prevent error msg in proof-display-some-buffers if response dead.
Diffstat (limited to 'generic')
-rw-r--r--generic/proof-menu.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/generic/proof-menu.el b/generic/proof-menu.el
index f8e8ff7b..94945889 100644
--- a/generic/proof-menu.el
+++ b/generic/proof-menu.el
@@ -31,11 +31,14 @@ If in three window or multiple frame mode, display both buffers."
(get-buffer-window proof-response-buffer 'visible))
;; Response buffer visible, let's display goals
(proof-switch-to-buffer proof-goals-buffer 'noselect))
- (t
+ ((buffer-live-p proof-response-buffer)
;; Response buffer invisible, let's display it
(proof-switch-to-buffer proof-response-buffer 'noselect)
(set-window-point (get-buffer-window proof-response-buffer)
- (point-max)))))
+ (point-max)))
+ (t
+ ;; No buffers existing, do nothing (might crank up process)
+ nil)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;