aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/play/solitaire.el8
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/play/solitaire.el b/lisp/play/solitaire.el
index 5c1dd061c9c..1383efe37cd 100644
--- a/lisp/play/solitaire.el
+++ b/lisp/play/solitaire.el
@@ -1,4 +1,4 @@
1;;; solitaire.el --- game of solitaire in Emacs Lisp 1;;; solitaire.el --- game of solitaire in Emacs Lisp -*- lexical-binding: t -*-
2 2
3;; Copyright (C) 1994, 2001-2020 Free Software Foundation, Inc. 3;; Copyright (C) 1994, 2001-2020 Free Software Foundation, Inc.
4 4
@@ -38,8 +38,7 @@
38 38
39(defcustom solitaire-mode-hook nil 39(defcustom solitaire-mode-hook nil
40 "Hook to run upon entry to Solitaire." 40 "Hook to run upon entry to Solitaire."
41 :type 'hook 41 :type 'hook)
42 :group 'solitaire)
43 42
44(defvar solitaire-mode-map 43(defvar solitaire-mode-map
45 (let ((map (make-sparse-keymap))) 44 (let ((map (make-sparse-keymap)))
@@ -119,8 +118,7 @@ The usual mnemonic keys move the cursor around the board; in addition,
119 "Non-nil means check for possible moves after each major change. 118 "Non-nil means check for possible moves after each major change.
120This takes a while, so switch this on if you like to be informed when 119This takes a while, so switch this on if you like to be informed when
121the game is over, or off, if you are working on a slow machine." 120the game is over, or off, if you are working on a slow machine."
122 :type 'boolean 121 :type 'boolean)
123 :group 'solitaire)
124 122
125(defconst solitaire-valid-directions 123(defconst solitaire-valid-directions
126 '(solitaire-left solitaire-right solitaire-up solitaire-down)) 124 '(solitaire-left solitaire-right solitaire-up solitaire-down))