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

* lisp/play/fortune.el (fortune-in-buffer): Revert previous nonsense.

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

5
lisp/play/fortune.el
View file

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