diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-08-14 18:15:22 -0700 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-08-14 18:20:04 -0700 |
| commit | b898528fdc69c9ac58895f8be81163dc304bd59b (patch) | |
| tree | 15ad95db4ebe78294ac4b84867077dbfcd2bc27c /lisp/play | |
| parent | aa1411b20fba73ca6fde90fc9ce62cc8a854bf20 (diff) | |
| download | emacs-b898528fdc69c9ac58895f8be81163dc304bd59b.tar.gz emacs-b898528fdc69c9ac58895f8be81163dc304bd59b.tar.bz2 emacs-b898528fdc69c9ac58895f8be81163dc304bd59b.zip | |
Add C-b/f/p/n keystrokes in `M-x snake'
* lisp/play/snake.el (snake-mode-map): Add the C-b/f/p/n in
addition to the cursor keys (bug#16720).
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/snake.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/play/snake.el b/lisp/play/snake.el index 7c19733f3d2..d0f94579062 100644 --- a/lisp/play/snake.el +++ b/lisp/play/snake.el @@ -179,8 +179,13 @@ and then start moving it leftwards.") (define-key map [left] 'snake-move-left) (define-key map [right] 'snake-move-right) - (define-key map [up] 'snake-move-up) + (define-key map [up] 'snake-move-up) (define-key map [down] 'snake-move-down) + + (define-key map "\C-b" 'snake-move-left) + (define-key map "\C-f" 'snake-move-right) + (define-key map "\C-p" 'snake-move-up) + (define-key map "\C-n" 'snake-move-down) map)) (defvar snake-null-map |