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:
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: