ttn pushed a commit to branch ttn-gnugo
in repository elpa.
commit 1567256220d490228cbed5cb36376614ded8eea6
Author: Thien-Thi Nguyen <[email protected]>
Date: Sat Feb 15 12:04:45 2014 +0100
[gnugo int] Use ‘set-process-query-on-exit-flag’.
* packages/gnugo/gnugo.el (gnugo-board-mode): ...here,
instead of avoiding ‘process-kill-buffer-query-function’.
---
packages/gnugo/ChangeLog | 7 +++++++
packages/gnugo/gnugo.el | 4 +---
2 files changed, 8 insertions(+), 3 deletions(-)
diff --git a/packages/gnugo/ChangeLog b/packages/gnugo/ChangeLog
index 2f365de..81167a0 100644
--- a/packages/gnugo/ChangeLog
+++ b/packages/gnugo/ChangeLog
@@ -1,3 +1,10 @@
+2014-02-15 Thien-Thi Nguyen <[email protected]>
+
+ [gnugo int] Use ‘set-process-query-on-exit-flag’.
+
+ * gnugo.el (gnugo-board-mode): ...here,
+ instead of avoiding ‘process-kill-buffer-query-function’.
+
2014-02-15 Thien-Thi Nguyen <[email protected]>
[gnugo int] Zonk unused local var.
diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index 684a282..1d5d5a5 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -1717,9 +1717,7 @@ In this mode, keys do not self insert. Default
keybindings:
"--mode" "gtp" "--quiet"
proc-args)))
;; Emacs is too protective sometimes, blech.
- (remove-hook (make-local-variable 'kill-buffer-query-functions)
- 'process-kill-buffer-query-function
- t)
+ (set-process-query-on-exit-flag (gnugo-get :proc) nil)
(when (or minus-l infile)
(mapc (lambda (x)
(apply (lambda (prop q)
