[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master c555d10 1/2: tetris-null-map: bind "q" to `quit-win
From: |
Sam Steingold |
Subject: |
[Emacs-diffs] master c555d10 1/2: tetris-null-map: bind "q" to `quit-window` |
Date: |
Thu, 2 May 2019 10:19:19 -0400 (EDT) |
branch: master
commit c555d10d0feee51dfe45305d3aae60490f425447
Author: Sam Steingold <address@hidden>
Commit: Sam Steingold <address@hidden>
tetris-null-map: bind "q" to `quit-window`
---
lisp/play/tetris.el | 1 +
1 file changed, 1 insertion(+)
diff --git a/lisp/play/tetris.el b/lisp/play/tetris.el
index 1e0681d..a797a26 100644
--- a/lisp/play/tetris.el
+++ b/lisp/play/tetris.el
@@ -277,6 +277,7 @@ each one of its four blocks.")
(defvar tetris-null-map
(let ((map (make-sparse-keymap 'tetris-null-map)))
(define-key map "n" 'tetris-start-game)
+ (define-key map "q" 'quit-window)
map))
;; ;;;;;;;;;;;;;;;; game functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;