diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-06-18 16:37:01 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-06-18 16:37:01 +0000 |
| commit | d576ef75bc395d5074651fbfbb419a9f6a19d78f (patch) | |
| tree | 17f80fc96b249e82186b568849833490b740da96 /lisp/play/mpuz.el | |
| parent | 74e2a7b575d6fa07c7bbec47a6cfae192b1dc685 (diff) | |
| download | emacs-d576ef75bc395d5074651fbfbb419a9f6a19d78f.tar.gz | |
(mpuz-congratulate): Don't say "1 errors".
Diffstat (limited to 'lisp/play/mpuz.el')
| -rw-r--r-- | lisp/play/mpuz.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/play/mpuz.el b/lisp/play/mpuz.el index a99182d1689..a0356722124 100644 --- a/lisp/play/mpuz.el +++ b/lisp/play/mpuz.el @@ -416,8 +416,9 @@ You may abort a game by typing \\<mpuz-mode-map>\\[mpuz-offer-abort]." (defun mpuz-congratulate () "Build a congratulation message when puzzle is solved." - (format "Puzzle solved with %d errors. %s" + (format "Puzzle solved with %d error%s. %s" mpuz-nb-errors + (if (= mpuz-nb-errors 1) "" "s") (cond ((= mpuz-nb-errors 0) "That's perfect !") ((= mpuz-nb-errors 1) "That's very good !") ((= mpuz-nb-errors 2) "That's good.") |