[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master e0080b8 2/4: * lisp/play/fortune.el (fortune-in-buf
|
From: |
Glenn Morris |
|
Subject: |
[Emacs-diffs] master e0080b8 2/4: * lisp/play/fortune.el (fortune-in-buffer): Unadvertise no-op arg. |
|
Date: |
Wed, 21 Mar 2018 14:14:08 -0400 (EDT) |
branch: master
commit e0080b854df655ecd224f2ed27b83c63e2ca50a1
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>
* lisp/play/fortune.el (fortune-in-buffer): Unadvertise no-op arg.
---
lisp/play/fortune.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/play/fortune.el b/lisp/play/fortune.el
index 740f436..e6c9c22 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