Index: emacs/lisp/play/tetris.el
diff -c emacs/lisp/play/tetris.el:1.13 emacs/lisp/play/tetris.el:1.14
*** emacs/lisp/play/tetris.el:1.13 Mon Jul 4 17:04:18 2005
--- emacs/lisp/play/tetris.el Sat Jul 16 18:38:33 2005
***************
*** 601,615 ****
(setq major-mode 'tetris-mode)
(setq mode-name "Tetris")
! (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 gamegrid-use-glyphs tetris-use-glyphs)
(setq gamegrid-use-color tetris-use-color)
--- 601,616 ----
(setq major-mode 'tetris-mode)
(setq mode-name "Tetris")
! (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 gamegrid-use-glyphs tetris-use-glyphs)
(setq gamegrid-use-color tetris-use-color)
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
