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 | 2694dfb9cdd2a4b13941b1cd5a9db61f2ac7148c (patch) | |
tree | f8161cf0e308a675da4f27a641fad6d2d904277d /lisp/play/yow.el | |
parent | b81d991d750ab6144067be09347295a2dd122716 (diff) | |
download | emacs-2694dfb9cdd2a4b13941b1cd5a9db61f2ac7148c.tar.gz |
(read-zippyism): New function.
Diffstat (limited to 'lisp/play/yow.el')
-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... |