emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/hiddenquote c0677533e8: Avoid prompting when the puzzle


From: ELPA Syncer
Subject: [elpa] externals/hiddenquote c0677533e8: Avoid prompting when the puzzle is complete
Date: Tue, 7 Nov 2023 18:58:06 -0500 (EST)

branch: externals/hiddenquote
commit c0677533e8aa6b2734e7b4b6f0b977a5c226acff
Author: Mauro Aranda <maurooaranda@gmail.com>
Commit: Mauro Aranda <maurooaranda@gmail.com>

    Avoid prompting when the puzzle is complete
    
    * hiddenquote.el (hiddenquote-quit): Check puzzle completeness and
    avoid prompting.
---
 hiddenquote.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/hiddenquote.el b/hiddenquote.el
index d8ea11d702..634c14655e 100644
--- a/hiddenquote.el
+++ b/hiddenquote.el
@@ -1692,9 +1692,11 @@ With a prefix argument NOPROMPT non-nil, doesn't prompt."
   "Stop playing hiddenquote, without saving the progress.
 
 Prompts the user and kills the buffer if the answer is \"yes\".
-With a prefix argument NOPROMPT non-nil, doesn't prompt."
+Kills the buffer unconditionally With a prefix argument NOPROMPT non-nil,
+or if the puzzle is complete."
   (interactive "P")
-  (when (or noprompt (yes-or-no-p "Really quit playing Hiddenquote? "))
+  (when (or noprompt (hiddenquote-puzzle-complete-p)
+            (yes-or-no-p "Really quit playing Hiddenquote? "))
     (hiddenquote-timer-stop-timer)
     (let ((name (buffer-name)))
       (dolist (buff (mapcar (lambda (suffix)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]