[Emacs-diffs] Changes to emacs/lisp/gnus/mail-source.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/04/07 16:03:32

Index: mail-source.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/mail-source.el,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -b -r1.38 -r1.39
--- mail-source.el      29 Mar 2008 19:54:09 -0000      1.38
+++ mail-source.el      7 Apr 2008 16:03:31 -0000       1.39
@@ -500,8 +500,7 @@
    ((stringp value)
     value)
    ;; Function
-   ((and (listp value)
-        (functionp (car value)))
+   ((and (listp value) (symbolp (car value)) (fboundp (car value)))
     (eval value))
    ;; Just return the value.
    (t