summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSam Steingold <sds@gnu.org>2019-05-02 10:17:04 -0400
committerSam Steingold <sds@gnu.org>2019-05-02 10:18:14 -0400
commitc555d10d0feee51dfe45305d3aae60490f425447 (patch)
tree486d5534c0c8e7c75ab2a98b41a0daa5583dd04d
parente13b8c0e405f1b5b78a1eeb3c33422b2fc93f002 (diff)
downloademacs-c555d10d0feee51dfe45305d3aae60490f425447.tar.gz
tetris-null-map: bind "q" to `quit-window`
-rw-r--r--lisp/play/tetris.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/play/tetris.el b/lisp/play/tetris.el
index 1e0681d7ff1..a797a26d597 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 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;