emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/play/fortune.el,v


From: Glenn Morris
Subject: [Emacs-diffs] Changes to emacs/lisp/play/fortune.el,v
Date: Sat, 20 Sep 2008 20:57:36 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       08/09/20 20:57:36

Index: fortune.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/play/fortune.el,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -b -r1.19 -r1.20
--- fortune.el  6 May 2008 07:24:05 -0000       1.19
+++ fortune.el  20 Sep 2008 20:57:36 -0000      1.20
@@ -87,9 +87,9 @@
   "Program to select a fortune cookie."
   :type 'string
   :group 'fortune)
-(defcustom fortune-program-options ""
-  "Options to pass to the fortune program (a string)."
-  :type 'string
+(defcustom fortune-program-options ()
+  "Options to pass to the fortune program."
+  :type '(repeat string)
   :group 'fortune)
 (defcustom fortune-strfile "strfile"
   "Program to compute a new fortune database."
@@ -299,11 +299,10 @@
       (if fortune-always-compile
          (fortune-compile fort-file))
 
-      (call-process
-        fortune-program  ;; programm to call
+      (apply 'call-process
+             fortune-program  ;; program to call
        nil fortune-buffer nil ;; INFILE BUFFER DISPLAYP
-       (concat fortune-program-options fort-file)))))
-
+             fort-file fortune-program-options))))
 
 ;;;###autoload
 (defun fortune (&optional file)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]