summaryrefslogtreecommitdiff
path: root/lisp/play/tetris.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-10-04 14:24:36 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-10-04 14:30:21 +0200
commit68b91333d5a070c84afeadc273fd5c44df70f0a6 (patch)
tree7c5aa196b1428e7faa636127d6106eac6b02dfbe /lisp/play/tetris.el
parent280bdc06cefa6e72e91c9da362770452d9bbbbd4 (diff)
downloademacs-68b91333d5a070c84afeadc273fd5c44df70f0a6.tar.gz
Remove XEmacs code from tetris.el
* lisp/play/tetris.el (tetris-mode): Remove XEmacs-only code.
Diffstat (limited to 'lisp/play/tetris.el')
-rw-r--r--lisp/play/tetris.el11
1 files changed, 0 insertions, 11 deletions
diff --git a/lisp/play/tetris.el b/lisp/play/tetris.el
index a797a26d597..a8fa7b75865 100644
--- a/lisp/play/tetris.el
+++ b/lisp/play/tetris.el
@@ -599,17 +599,6 @@ Drops the shape one square, testing for collision."
(use-local-map tetris-null-map)
- (unless (featurep 'emacs)
- (setq mode-popup-menu
- '("Tetris Commands"
- ["Start new game" tetris-start-game]
- ["End game" tetris-end-game
- (tetris-active-p)]
- ["Pause" tetris-pause-game
- (and (tetris-active-p) (not tetris-paused))]
- ["Resume" tetris-pause-game
- (and (tetris-active-p) tetris-paused)])))
-
(setq show-trailing-whitespace nil)
(setq gamegrid-use-glyphs tetris-use-glyphs)