emacs-super-duper-yes-or-no

Replace the yes-or-no function with an even more demanding yes or no prompt, rather than with y-or-n.
Log | Files | Refs | LICENSE

commit 503d1101cafbd432a59d3cde300eed6b5bd7b801
parent ae78d10e46d791148888a31cebb3f6216145e541
Author: Yuval Langer <yuvallangerontheroad@gmail.com>
Date:   Fri,  6 Oct 2023 02:27:47 +0300

Cargo-cult autoloads and `provide` for `require`.

Diffstat:
Msuper-duper-yes-or-no.el | 5+++++
1 file changed, 5 insertions(+), 0 deletions(-)

diff --git a/super-duper-yes-or-no.el b/super-duper-yes-or-no.el @@ -113,6 +113,7 @@ Will result with: (sd--list-intersperse (cdr input-list) intersperser)))))) +;;;###autoload (defun sd-yes-or-no-words-p (prompt) "Ask user a yes or no question. @@ -223,6 +224,7 @@ the toggle count AND they are not toggled." when (char-uppercase-p input-char) concat (char-to-string input-char))) +;;;###autoload (defun sd-yes-or-no-toggle-case-p (prompt) "Ask user a yes or no question, but expect the uppercase letters. @@ -291,6 +293,7 @@ write in sequence the uppercase letters of the first line, otherwise, the upperc (t (cons (car arithmetic-expression-template) (sd--make-arithmetic-problem-arguments (cdr arithmetic-expression-template)))))) +;;;###autoload (defun sd-yes-or-no-arithmetic-problem-p (prompt) "Ask user a yes or no question, but as an answer to an arithmetic expression. @@ -330,6 +333,8 @@ problem, otherwise, the answer to the second problem." (= user-input wanted-input-yes)))) +(provide 'super-duper-yes-or-no) + ;; Local Variables: ;; read-symbol-shorthands: (("sd-" . "super-duper-yes-or-no-")) ;; End: