diff options
| -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 |