diff options
| author | Sam Steingold | 2019-05-02 10:17:04 -0400 |
|---|---|---|
| committer | Sam Steingold | 2019-05-02 10:18:14 -0400 |
| commit | c555d10d0feee51dfe45305d3aae60490f425447 (patch) | |
| tree | 486d5534c0c8e7c75ab2a98b41a0daa5583dd04d | |
| parent | e13b8c0e405f1b5b78a1eeb3c33422b2fc93f002 (diff) | |
| download | emacs-c555d10d0feee51dfe45305d3aae60490f425447.tar.gz emacs-c555d10d0feee51dfe45305d3aae60490f425447.zip | |
tetris-null-map: bind "q" to `quit-window`
| -rw-r--r-- | lisp/play/tetris.el | 1 |
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.") | |||
| 277 | (defvar tetris-null-map | 277 | (defvar tetris-null-map |
| 278 | (let ((map (make-sparse-keymap 'tetris-null-map))) | 278 | (let ((map (make-sparse-keymap 'tetris-null-map))) |
| 279 | (define-key map "n" 'tetris-start-game) | 279 | (define-key map "n" 'tetris-start-game) |
| 280 | (define-key map "q" 'quit-window) | ||
| 280 | map)) | 281 | map)) |
| 281 | 282 | ||
| 282 | ;; ;;;;;;;;;;;;;;;; game functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 283 | ;; ;;;;;;;;;;;;;;;; game functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |