aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2008-02-23 19:35:42 +0000
committerGlenn Morris2008-02-23 19:35:42 +0000
commit0329d8a3e84dcf8cc2fb1d8913f86a935ebaeb1e (patch)
treecdbf26a874c6ab864e89bd666470561f573b1f99 /lisp
parent0fc1e8febff30b4fb065e283bf267d1fa9f03025 (diff)
downloademacs-0329d8a3e84dcf8cc2fb1d8913f86a935ebaeb1e.tar.gz
emacs-0329d8a3e84dcf8cc2fb1d8913f86a935ebaeb1e.zip
(menu-bar-games-menu): Add Bubbles and Pong. Add :help for Solitaire and Tetris.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog13
-rw-r--r--lisp/menu-bar.el12
2 files changed, 23 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c22c36407a5..51a687ade61 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,16 @@
12008-02-23 Glenn Morris <rgm@gnu.org>
2
3 * menu-bar.el (menu-bar-games-menu): Add Bubbles and Pong.
4 Add :help for Solitaire and Tetris.
5
6 * mail/smtpmail.el: Remove leading `*' from defcustom doc-strings.
7 (smtpmail-code-conv-from): Doc fix. Fix custom type.
8 (smtpmail-queue-index-file): Make it a defcustom.
9 (smtpmail-queue-index): Delete.
10 (smtpmail-send-it, smtpmail-send-queued-mail):
11 Use smtpmail-queue-index-file and smtpmail-queue-dir rather than
12 smtpmail-queue-index.
13
12008-02-23 Dan Nicolaescu <dann@ics.uci.edu> 142008-02-23 Dan Nicolaescu <dann@ics.uci.edu>
2 15
3 * vc.el (vc-find-revision): Make vc-parent-buffer local before 16 * vc.el (vc-find-revision): Make vc-parent-buffer local before
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 36cf45b55c5..9d6303314cd 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -1096,12 +1096,17 @@ mail status in mode line"))
1096 '(menu-item "Zone Out" zone 1096 '(menu-item "Zone Out" zone
1097 :help "Play tricks with Emacs display when Emacs is idle")) 1097 :help "Play tricks with Emacs display when Emacs is idle"))
1098(define-key menu-bar-games-menu [tetris] 1098(define-key menu-bar-games-menu [tetris]
1099 '(menu-item "Tetris" tetris)) 1099 '(menu-item "Tetris" tetris
1100 :help "Falling blocks game"))
1100(define-key menu-bar-games-menu [solitaire] 1101(define-key menu-bar-games-menu [solitaire]
1101 '(menu-item "Solitaire" solitaire)) 1102 '(menu-item "Solitaire" solitaire
1103 :help "Get rid of all the stones"))
1102(define-key menu-bar-games-menu [snake] 1104(define-key menu-bar-games-menu [snake]
1103 '(menu-item "Snake" snake 1105 '(menu-item "Snake" snake
1104 :help "Move snake around avoiding collisions")) 1106 :help "Move snake around avoiding collisions"))
1107(define-key menu-bar-games-menu [pong]
1108 '(menu-item "Pong" pong
1109 :help "Bounce the ball to your opponent"))
1105(define-key menu-bar-games-menu [mult] 1110(define-key menu-bar-games-menu [mult]
1106 '(menu-item "Multiplication Puzzle" mpuz 1111 '(menu-item "Multiplication Puzzle" mpuz
1107 :help "Exercise brain with multiplication")) 1112 :help "Exercise brain with multiplication"))
@@ -1114,6 +1119,9 @@ mail status in mode line"))
1114(define-key menu-bar-games-menu [gomoku] 1119(define-key menu-bar-games-menu [gomoku]
1115 '(menu-item "Gomoku" gomoku 1120 '(menu-item "Gomoku" gomoku
1116 :help "Mark 5 contiguous squares (like tic-tac-toe)")) 1121 :help "Mark 5 contiguous squares (like tic-tac-toe)"))
1122(define-key menu-bar-games-menu [bubbles]
1123 '(menu-item "Bubbles" bubbles
1124 :help "Remove all bubbles using the fewest moves"))
1117(define-key menu-bar-games-menu [black-box] 1125(define-key menu-bar-games-menu [black-box]
1118 '(menu-item "Blackbox" blackbox 1126 '(menu-item "Blackbox" blackbox
1119 :help "Find balls in a black box by shooting rays")) 1127 :help "Find balls in a black box by shooting rays"))