Function: fortune-add-fortune
fortune-add-fortune is an autoloaded, interactive and byte-compiled
function defined in fortune.el.gz.
Signature
(fortune-add-fortune STRING FILE)
Documentation
Add STRING to a fortune file FILE.
Interactively, if called with a prefix argument,
read the file name to use. Otherwise use the value of fortune-file.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/play/fortune.el.gz
;;;###autoload
(defun fortune-add-fortune (string file)
"Add STRING to a fortune file FILE.
Interactively, if called with a prefix argument,
read the file name to use. Otherwise use the value of `fortune-file'."
(interactive
(list (read-string "Fortune: ")
(if current-prefix-arg (fortune-ask-file))))
(fortune-append string t file))