diff options
| author | Karl Heuer <kwzh@gnu.org> | 1999-06-17 05:29:34 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1999-06-17 05:29:34 +0000 |
| commit | 7b42704317f30973c54aa4bdf21f97bf3f55d777 (patch) | |
| tree | bf5bb5804520cdaa05611d863f1d732d401c87ed /lisp/play/mpuz.el | |
| parent | a14724c88050eba1e9e3709028bc8acc6e9252be (diff) | |
(mpuz-try-proposal): Fix message call.
Don't penalize player for certain impossible guesses.
Diffstat (limited to 'lisp/play/mpuz.el')
| -rw-r--r-- | lisp/play/mpuz.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/play/mpuz.el b/lisp/play/mpuz.el index 8f0f2f688e..c0323610ab 100644 --- a/lisp/play/mpuz.el +++ b/lisp/play/mpuz.el @@ -393,7 +393,9 @@ You may abort a game by typing \\<mpuz-mode-map>\\[mpuz-offer-abort]." (digit (- digit-char ?0)) (correct-digit (mpuz-to-digit letter))) (cond ((mpuz-digit-solved-p correct-digit) - (message "%c has already been found.")) + (message "%c has already been found." (+ correct-digit ?0))) + ((mpuz-digit-solved-p digit) + (message "%c has already been placed." digit-char)) ((= digit correct-digit) (message "%c = %c correct !" letter-char digit-char) (mpuz-ding) |