87 lines
3.0 KiB
Diff
87 lines
3.0 KiB
Diff
From 6f29ac0393bb0bb70c8122d9f1bda0ae5d8cee24 Mon Sep 17 00:00:00 2001
|
|
From: Peter Oliver <git@mavit.org.uk>
|
|
Date: Thu, 26 Sep 2024 13:20:06 +0100
|
|
Subject: [PATCH] Pong and Tetris are excluded.
|
|
|
|
---
|
|
doc/emacs/ack.texi | 2 +-
|
|
doc/emacs/misc.texi | 7 +------
|
|
lisp/menu-bar.el | 6 ------
|
|
test/src/doc-tests.el | 4 ++--
|
|
4 files changed, 4 insertions(+), 15 deletions(-)
|
|
|
|
diff --git a/doc/emacs/ack.texi b/doc/emacs/ack.texi
|
|
index 5ec5cd53fa6..26f174831ca 100644
|
|
--- a/doc/emacs/ack.texi
|
|
+++ b/doc/emacs/ack.texi
|
|
@@ -228,7 +228,7 @@ Acknowledgments
|
|
|
|
@item
|
|
Glynn Clements provided @file{gamegrid.el} and a couple of games that
|
|
-use it, Snake and Tetris.
|
|
+use it, including Snake.
|
|
|
|
@item
|
|
Andrew Cohen wrote @file{spam-wash.el}, to decode and clean email before
|
|
diff --git a/doc/emacs/misc.texi b/doc/emacs/misc.texi
|
|
index 41e37fd094e..38e281bf59c 100644
|
|
--- a/doc/emacs/misc.texi
|
|
+++ b/doc/emacs/misc.texi
|
|
@@ -3248,14 +3248,9 @@ Amusements
|
|
nato-region} converts the text in the region to NATO phonetic
|
|
alphabet; @kbd{M-x denato-region} converts it back.
|
|
|
|
-@findex pong
|
|
-@cindex Pong game
|
|
-@findex tetris
|
|
-@cindex Tetris
|
|
@findex snake
|
|
@cindex Snake
|
|
- @kbd{M-x pong}, @kbd{M-x snake} and @kbd{M-x tetris} are
|
|
-implementations of the well-known Pong, Snake and Tetris games.
|
|
+ @kbd{M-x snake} is an implementation of the well-known Snake game.
|
|
|
|
@findex solitaire
|
|
@cindex solitaire
|
|
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
|
|
index bcfa83cf8e4..1b0a0bce6a5 100644
|
|
--- a/lisp/menu-bar.el
|
|
+++ b/lisp/menu-bar.el
|
|
@@ -1658,18 +1658,12 @@ menu-bar-games-menu
|
|
(bindings--define-key menu [zone]
|
|
'(menu-item "Zone Out" zone
|
|
:help "Play tricks with Emacs display when Emacs is idle"))
|
|
- (bindings--define-key menu [tetris]
|
|
- '(menu-item "Tetris" tetris
|
|
- :help "Falling blocks game"))
|
|
(bindings--define-key menu [solitaire]
|
|
'(menu-item "Solitaire" solitaire
|
|
:help "Get rid of all the stones"))
|
|
(bindings--define-key menu [snake]
|
|
'(menu-item "Snake" snake
|
|
:help "Move snake around avoiding collisions"))
|
|
- (bindings--define-key menu [pong]
|
|
- '(menu-item "Pong" pong
|
|
- :help "Bounce the ball to your opponent"))
|
|
(bindings--define-key menu [mult]
|
|
'(menu-item "Multiplication Puzzle" mpuz
|
|
:help "Exercise brain with multiplication"))
|
|
diff --git a/test/src/doc-tests.el b/test/src/doc-tests.el
|
|
index b41a7ac5fb6..24befb737bc 100644
|
|
--- a/test/src/doc-tests.el
|
|
+++ b/test/src/doc-tests.el
|
|
@@ -34,8 +34,8 @@ doc-tests-documentation/autoloaded-macro
|
|
|
|
(ert-deftest doc-tests-documentation/autoloaded-defun ()
|
|
(skip-unless noninteractive)
|
|
- (should (autoloadp (symbol-function 'tetris)))
|
|
- (should (stringp (documentation 'tetris)))) ; See Bug#52969.
|
|
+ (should (autoloadp (symbol-function 'doctor)))
|
|
+ (should (stringp (documentation 'doctor)))) ; See Bug#52969.
|
|
|
|
(ert-deftest doc-tests-quoting-style ()
|
|
(should (memq (text-quoting-style) '(grave straight curve))))
|
|
--
|
|
2.46.1
|
|
|