Mercurial > emacs

diff lisp/play/fortune.el @ 98292:1943be2bc7c2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(fortune-in-buffer): Fix a bug which forced usage of `fortune-file' even though a FILE argument was passed to the function.
author Tassilo Horn <tassilo@member.fsf.org>
date Mon, 22 Sep 2008 10:24:31 +0000
parents 7aacb688e121
children a9dc0e7c3f2b
line wrap: on
line diff
--- a/lisp/play/fortune.el	Sun Sep 21 23:32:49 2008 +0000
+++ b/lisp/play/fortune.el	Mon Sep 22 10:24:31 2008 +0000
@@ -306,7 +306,7 @@
              nil fortune-buffer nil     ; INFILE BUFFER DISPLAY
              (append (if (stringp fortune-program-options)
                          (split-string fortune-program-options)
-                       fortune-program-options) (list fortune-file))))))
+                       fortune-program-options) (list fort-file))))))
 
 ;;;###autoload
 (defun fortune (&optional file)