Commit 17dcf97f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(solitaire-quit): Function deleted.

(solitaire-mode-map): Use quit-window for q.
parent 7591cf05
......@@ -48,7 +48,7 @@
(substitute-key-definition 'undo 'solitaire-undo
solitaire-mode-map global-map)
(define-key solitaire-mode-map " " 'solitaire-do-check)
(define-key solitaire-mode-map "q" 'solitaire-quit)
(define-key solitaire-mode-map "q" 'quit-window)
(define-key solitaire-mode-map [right] 'solitaire-right)
(define-key solitaire-mode-map [left] 'solitaire-left)
......@@ -416,11 +416,6 @@ Seen in info on text lines."
(if (= (current-column) 0) 1 0)
-1))
(defun solitaire-quit ()
"Quit playing Solitaire."
(interactive)
(kill-buffer "*Solitaire*"))
;; And here's the spoiler:)
(defun solitaire-solve ()
"Spoil solitaire by solving the game for you - nearly ...
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment