Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 19:07:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

* lisp/play/fortune.el (fortune-in-buffer): Unadvertise no-op arg.

Browse source
This commit is contained in:
Glenn Morris 2018-03-21 14:12:17 -04:00 committed by Andrew G Cohen
parent 590166c829
commit e31b2771e7
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/play/fortune.el
View file

@ -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