diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2001-12-20 18:59:32 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2001-12-20 18:59:32 +0000 |
| commit | 0ff9b955fe8d8032f5c139dcc86990f0177b646f (patch) | |
| tree | ca703702f9fd7d7a9a15f77cb5cdc28c5767bdc2 /lisp/play | |
| parent | 3c08498acc0ad4b82ffa5e13b87f098cdb5fcda8 (diff) | |
| download | emacs-0ff9b955fe8d8032f5c139dcc86990f0177b646f.tar.gz | |
Doc fixes.
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/gomoku.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/play/gomoku.el b/lisp/play/gomoku.el index 28c829d2ac4..9096d4be790 100644 --- a/lisp/play/gomoku.el +++ b/lisp/play/gomoku.el @@ -947,7 +947,7 @@ If the game is finished, this command requests for another game." (message "Chicken !"))) (defun gomoku-offer-a-draw () - "Offer a draw and return T if Human accepted it." + "Offer a draw and return t if Human accepted it." (or (y-or-n-p "I offer you a draw. Do you accept it ") (not (setq gomoku-human-refused-draw t)))) @@ -1095,14 +1095,14 @@ If the game is finished, this command requests for another game." ;; who won. The solution is to scan the board along all four directions. (defun gomoku-find-filled-qtuple (square value) - "Return T if SQUARE belongs to a qtuple filled with VALUEs." + "Return t if SQUARE belongs to a qtuple filled with VALUEs." (or (gomoku-check-filled-qtuple square value 1 0) (gomoku-check-filled-qtuple square value 0 1) (gomoku-check-filled-qtuple square value 1 1) (gomoku-check-filled-qtuple square value -1 1))) (defun gomoku-check-filled-qtuple (square value dx dy) - "Return T if SQUARE belongs to a qtuple filled with VALUEs along DX, DY." + "Return t if SQUARE belongs to a qtuple filled with VALUEs along DX, DY." (let ((a 0) (b 0) (left square) (right square) (depl (gomoku-xy-to-index dx dy))) |