[elpa] 29/255: q now quits a sgf display buffer

[Eric Schulte]

eschulte pushed a commit to branch go
in repository elpa.

commit 3cdb94591741d04dbf95193a74da928003165ded
Author: Eric Schulte <address@hidden>
Date:   Wed May 16 23:48:02 2012 -0400

    q now quits a sgf display buffer
---
 sgf.el |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/sgf.el b/sgf.el
index 828c74e..7b0096c 100644
--- a/sgf.el
+++ b/sgf.el
@@ -391,7 +391,8 @@
   (let ((map (make-sparse-keymap)))
     (define-key map (kbd "<right>") 'right)
     (define-key map (kbd "<left>")  'left)
-    (define-key map (kbd "q") 'kill-buffer)
+    (define-key map (kbd "q") (lambda () (interactive)
+                                (kill-buffer (current-buffer))))
     map)
   "Keymap for `sgf-mode'.")