* chess.el Add to games menu.

diff --git a/chess-ics.el b/chess-ics.el
index 0e44187d71772e7bc0d99ef234c6322019171a0b..ca2aaab7766e548af350afd8d830466d1de1afcc 100644 (file)
--- a/chess-ics.el
+++ b/chess-ics.el
@@ -827,6 +827,9 @@ This function should be put on `comint-preoutput-filter-functions'."
        (accept-process-output (get-buffer-process (current-buffer)) 0 100)))
     (switch-to-buffer buf)))
 
+;;;###autoload
+(define-key menu-bar-games-menu [chess-ics] '(menu-item "Internet Chess Servers" chess-ics :help "Play Chess on the Internet"))
+
 ;;; ICC datagrams
 
 ;; See http://www.chessclub.com/resources/formats/formats.txt

diff --git a/chess.el b/chess.el
index e45eee96903c94fbae304f40aef9cadedff64f50..00f06ac56b81d16a59e4e5bcc8369838467125f6 100644 (file)
--- a/chess.el
+++ b/chess.el
@@ -234,6 +234,9 @@ Otherwise use `chess-default-engine' to determine the engine."
 ;;;###autoload
 (defalias 'chess-session 'chess)
 
+;;;###autoload
+(define-key menu-bar-games-menu [chess] '(menu-item "Chess" chess :help "Play Chess"))
+
 ;;;###autoload
 (defun chess-create-display (perspective &optional modules-too)
   "Create a display, letting the user's customization decide the style.