diff options
author | Glenn Morris <rgm@gnu.org> | 2018-03-21 17:10:41 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2018-03-21 17:10:41 -0400 |
commit | 3b42c083b658649a300594a5499db73b0a49152f (patch) | |
tree | 58bad571441b92e36fdfc259c53b62e24cfb63ee /lisp/play/fortune.el | |
parent | 61dfc2c283f83f17bd9c757d5b953099d09e8f8c (diff) | |
download | emacs-3b42c083b658649a300594a5499db73b0a49152f.tar.gz |
* lisp/play/fortune.el (fortune-in-buffer): Revert previous nonsense.
Diffstat (limited to 'lisp/play/fortune.el')
-rw-r--r-- | lisp/play/fortune.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/play/fortune.el b/lisp/play/fortune.el index e6c9c227c48..740f436711a 100644 --- a/lisp/play/fortune.el +++ b/lisp/play/fortune.el @@ -283,9 +283,8 @@ and choose the directory as the fortune-file." ;;; Display fortune (defun fortune-in-buffer (_interactive &optional file) "Put a fortune cookie in the *fortune* buffer. -Optional argument FILE, when supplied, specifies the file to -choose the fortune from." - (declare (advertised-calling-convention (&optional file) "27.1")) +INTERACTIVE is ignored. Optional argument FILE, when supplied, +specifies the file to choose the fortune from." (let ((fortune-buffer (or (get-buffer fortune-buffer-name) (generate-new-buffer fortune-buffer-name))) (fort-file (expand-file-name |