[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: functionp bug
From: |
Stefan Monnier |
Subject: |
Re: functionp bug |
Date: |
Mon, 07 Apr 2008 12:04:06 -0400 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux) |
> * subr.el (functionp): Return nil for special forms.
> Because of this, the `file' mail source without the :path spec,
> i.e. (setq mail-sources '((file))), for Gnus doesn't work as
> follows:
> (mail-source-value (cadr (assq :path (assq 'file mail-source-keyword-map))))
> => (or (getenv "MAIL")
> (expand-file-name (user-login-name) rmail-spool-directory))
I've installed the patch below which should fix it.
Stefan
--- mail-source.el.~1.38.~ 2008-03-30 10:39:37.000000000 -0400
+++ mail-source.el 2008-04-07 12:02:53.000000000 -0400
@@ -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
- functionp bug, Katsumi Yamaoka, 2008/04/06
- Re: functionp bug,
Stefan Monnier <=
- Re: functionp bug, Reiner Steib, 2008/04/07
- Re: functionp bug, Stefan Monnier, 2008/04/07
- Re: functionp bug, Katsumi Yamaoka, 2008/04/09
- Re: functionp bug, Andreas Schwab, 2008/04/09
- Re: functionp bug, Richard Stallman, 2008/04/09
- Re: functionp bug, Stefan Monnier, 2008/04/09