From e0080b854df655ecd224f2ed27b83c63e2ca50a1 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 21 Mar 2018 14:12:17 -0400 Subject: [PATCH] * 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 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 -- 2.39.5