[Emacs-diffs] Changes to emacs/lisp/play/solitaire.el, v [EMACS_22_BASE]

[Juanma Barranquero]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Juanma Barranquero <lektu>      08/08/26 11:03:00

Index: play/solitaire.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/play/solitaire.el,v
retrieving revision 1.19.2.3
retrieving revision 1.19.2.4
diff -u -b -r1.19.2.3 -r1.19.2.4
--- play/solitaire.el   12 Aug 2008 22:23:35 -0000      1.19.2.3
+++ play/solitaire.el   26 Aug 2008 11:02:59 -0000      1.19.2.4
@@ -35,15 +35,15 @@
 ;;; Code:
 
 (defgroup solitaire nil
-  "Game of solitaire."
+  "Game of Solitaire."
   :prefix "solitaire-"
   :group 'games)
 
 (defvar solitaire-mode-map nil
-  "Keymap for playing solitaire.")
+  "Keymap for playing Solitaire.")
 
 (defcustom solitaire-mode-hook nil
-  "Hook to run upon entry to solitaire."
+  "Hook to run upon entry to Solitaire."
   :type 'hook
   :group 'solitaire)
 
@@ -94,8 +94,8 @@
 (put 'solitaire-mode 'mode-class 'special)
 
 (defun solitaire-mode ()
-  "Major mode for playing solitaire.
-To learn how to play solitaire, see the documentation for function
+  "Major mode for playing Solitaire.
+To learn how to play Solitaire, see the documentation for function
 `solitaire'.
 \\<solitaire-mode-map>
 The usual mnemonic keys move the cursor around the board; in addition,
@@ -147,7 +147,7 @@
 Undo moves using \\[solitaire-undo].
 Check for possible moves using \\[solitaire-do-check].
 \(The variable `solitaire-auto-eval' controls whether to automatically
-check after each move or undo)
+check after each move or undo.)
 
 What is Solitaire?
 
@@ -428,7 +428,7 @@
 
 ;; And here's the spoiler:)
 (defun solitaire-solve ()
-  "Spoil solitaire by solving the game for you - nearly ...
+  "Spoil Solitaire by solving the game for you - nearly ...
 ... stops with five stones left ;)"
   (interactive)
   (when (< solitaire-stones 32)