From 19e93a599f07ace57ec42310db830d2ecec2dbbf Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Tue, 17 Aug 2010 12:31:47 +0000 Subject: quit-prover: avoid kill buffer query question --- generic/pg-autotest.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'generic/pg-autotest.el') diff --git a/generic/pg-autotest.el b/generic/pg-autotest.el index d084febd..ab4c4018 100644 --- a/generic/pg-autotest.el +++ b/generic/pg-autotest.el @@ -251,7 +251,8 @@ completely processing the buffer as the last step." (defun pg-autotest-test-quit-prover () "Exit prover process." (if (buffer-live-p proof-shell-buffer) - (kill-buffer proof-shell-buffer) + (let ((kill-buffer-query-functions nil)) + (kill-buffer proof-shell-buffer)) (error "No proof shell buffer to kill"))) -- cgit v1.2.3