[nongnu] elpa/pacmacs fe05829cd3 004/472: Fix kill buffer problem. Close #7

[ELPA Syncer]

branch: elpa/pacmacs
commit fe05829cd3565d0d7c85143776f3bcd9bfc1802f
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    Fix kill buffer problem. Close #7
---
 pacman.el | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/pacman.el b/pacman.el
index c059f9bd45..e3ed9e9fd8 100644
--- a/pacman.el
+++ b/pacman.el
@@ -9,7 +9,7 @@
   (define-key pacman-mode-map (kbd "<left>") 'pacman-left)
   (define-key pacman-mode-map (kbd "<right>") 'pacman-right)
   (define-key pacman-mode-map (kbd "q") 'pacman-quit)
-  (add-hook 'kill-buffer-hook 'pacman-kill-buffer-hook))
+  (add-hook 'kill-buffer-hook 'pacman-destroy :local t))
 
 (defun pacman-start ()
   (interactive)
@@ -18,12 +18,6 @@
   (unless pacman-timer
     (setq pacman-timer (run-at-time nil 0.1 'pacman-tick))))
 
-(defun pacman-kill-buffer-hook ()
-  (interactive)
-  (when (string= pacman-buffer-name
-                 (buffer-name (current-buffer)))
-    (pacman-destroy)))
-
 (defun pacman-destroy ()
   (when pacman-timer
     (cancel-timer pacman-timer)