diff options
author | Roland McGrath <roland@gnu.org> | 1993-09-17 18:52:33 +0000 |
---|---|---|
committer | Roland McGrath <roland@gnu.org> | 1993-09-17 18:52:33 +0000 |
commit | ba806ad8d6bae1db65a539e692ea2862d2fec863 (patch) | |
tree | 3f6deaad61c666b7c63550276d0488b596d1f82c /lisp/play | |
parent | 07823788b00748b57e03ca317c3f6c54725cb5b1 (diff) | |
download | emacs-ba806ad8d6bae1db65a539e692ea2862d2fec863.tar.gz |
(read-zippyism): New function.
Diffstat (limited to 'lisp/play')
-rw-r--r-- | lisp/play/yow.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/play/yow.el b/lisp/play/yow.el index fd90d3677f1..d25c6910e69 100644 --- a/lisp/play/yow.el +++ b/lisp/play/yow.el @@ -52,6 +52,12 @@ (with-output-to-temp-buffer "*Help*" (princ yow)))))) +(defsubst read-zippyism (prompt &optional require-match) + "Read a Zippyism from the minibuffer with completion, prompting with PROMPT. +If optional second arg is non-nil, require input to match a completion." + (read-cookie prompt yow-file + "Am I CONSING yet?..." "I have SEEN the CONSING!!" + require-match)) ; Yowza!! Feed zippy quotes to the doctor. Watch results. ; fun, fun, fun. Entertainment for hours... |