[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [AUCTeX-devel] Re: [AUCTeX-diffs] Changes to auctex/ChangeLog
From: |
David Kastrup |
Subject: |
Re: [AUCTeX-devel] Re: [AUCTeX-diffs] Changes to auctex/ChangeLog |
Date: |
Sat, 23 Apr 2005 22:32:43 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
David Kastrup <address@hidden> writes:
> Reiner Steib <address@hidden> writes:
>
>> My mistake, sorry. IIRC, for this code...
>> (defcustom font-latex-title-fontify (if (featurep 'xemacs) 'color 1.1)
>> ... the extra `eval' was (or would be) necessary.
>>
>> I was surprised that `foo-1' defcustomed as...
>>
>> (defcustom foo-1 (if (featurep 'xemacs) 'color 1.1)
>> "bar"
>> :initialize (lambda (symbol value)
>> (set-default symbol value)))
>> ==> (if (featurep 'xemacs) 'color 1.1)
>>
>> ... is not a number, i.e. (number ...) is nil. Therefore I added
>> `eval':
>> (defcustom foo-2 (if (featurep 'xemacs) 'color 1.1)
>> "bar"
>> :initialize (lambda (symbol value)
>> (set-default symbol (eval value))))
>> ==> 1.1
>>
>> I don't know how it can be done in more clearly.
>
> (defcustom foo-2 (eval-when-compile (if featurep 'xemacs) 'color 1.1))
> ...
> )
Bother, that is just skirting the issue. I just checked and all the
custom-initialize whatever functions do an explicit eval on the value.
There must be millions of places in code I wrote where this is done
wrong.
Sigh.
--
David Kastrup, Kriemhildstr. 15, 44793 Bochum
[AUCTeX-devel] Re: [AUCTeX-diffs] Changes to auctex/ChangeLog, Reiner Steib, 2005/04/23