Re: defcustom cant handle quoted symbol value

[Andreas Schwab]

"Järneström Jonas" <erajonj@ki.ericsson.se> writes:

|> In GNU Emacs 20.6.1 (sparc-sun-solaris2.6, X toolkit)
|>  of Fri Mar  3 2000 on iris
|> configured using `configure  --with-gcc --with-pop --with-x-toolkit=lucid 
--bindir=/usr/local/bin --libexecdir=/usr/local/libexec'
|> 
|> I have a code as below. You can test it by loading it and doing
|> (customize-group 'teamconf)
|> Notice how the first option is fucked up with no hilite and no menu,
|> as compared with the second option. The only difference is that I use
|> 'main-vob in the first and "main-vob" in the second. Nothing in the
|> ref man suggests that defcustom can't handle a quoted symbol, why I
|> belive this is a bug.
|> 
|> (defgroup teamconf nil "ClearCase Config Specs" 
|>   :group 'tools 
|>   :prefix "cs")
|> 
|> (defcustom cs-autolist-recent-objects 'main-vob
|>   "*Vob(s) to list recent objects from, at start of session.
|> If t, list all vobs. If non-nil, list main vob. If nil, turned off."
|>   :group 'teamconf
|>   :type '(choice :tag "Vobs to autolist"
|>               (const :tag "None" nil)
|>               (const :tag "Main Vob" 'main-vob)

'main-vob == (quote main-vob), so this is not a symbol.  Just remove the
quote sign.

Andreas.

-- 
Andreas Schwab, SuSE Labs, schwab@suse.de
SuSE GmbH, Deutschherrnstr. 15-19, D-90429 Nürnberg
Key fingerprint = 58CA 54C7 6D53 942B 1756  01D3 44D5 214B 8276 4ED5
"And now for something completely different."