summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2018-03-21 14:12:17 -0400
committerGlenn Morris <rgm@gnu.org>2018-03-21 14:12:17 -0400
commite0080b854df655ecd224f2ed27b83c63e2ca50a1 (patch)
tree0852c0b6adf5849476cf5a96bf9ba44c484ab57f
parent03a27fab69e48f350679de8ef76c4b803d882e91 (diff)
downloademacs-e0080b854df655ecd224f2ed27b83c63e2ca50a1.tar.gz
emacs-e0080b854df655ecd224f2ed27b83c63e2ca50a1.tar.bz2
emacs-e0080b854df655ecd224f2ed27b83c63e2ca50a1.zip
* lisp/play/fortune.el (fortune-in-buffer): Unadvertise no-op arg.
-rw-r--r--lisp/play/fortune.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/play/fortune.el b/lisp/play/fortune.el
index 740f436711a..e6c9c227c48 100644
--- a/lisp/play/fortune.el
+++ b/lisp/play/fortune.el
@@ -283,8 +283,9 @@ 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.
-INTERACTIVE is ignored. Optional argument FILE, when supplied,
-specifies the file to choose the fortune from."
+Optional argument FILE, when supplied, specifies the file to
+choose the fortune from."
+ (declare (advertised-calling-convention (&optional file) "27.1"))
(let ((fortune-buffer (or (get-buffer fortune-buffer-name)
(generate-new-buffer fortune-buffer-name)))
(fort-file (expand-file-name