changeset 98292:1943be2bc7c2

(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 bea14960a539
children 5286cdd20519
files lisp/ChangeLog lisp/play/fortune.el
diffstat 2 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Sep 21 23:32:49 2008 +0000
+++ b/lisp/ChangeLog	Mon Sep 22 10:24:31 2008 +0000
@@ -1,3 +1,9 @@
+2008-09-22  Tassilo Horn  <tassilo@member.fsf.org>
+
+	* play/fortune.el (fortune-in-buffer): Fix a bug which forced
+	usage of `fortune-file' even though a FILE argument was passed to
+	the function.
+
 2008-09-21  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* startup.el (command-line): Start the server when in daemon mode.
--- 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)