bug-gnu-emacs
[Top][All Lists]
Advanced

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

defcustom cant handle quoted symbol value


From: Järneström Jonas
Subject: defcustom cant handle quoted symbol value
Date: Wed, 27 Feb 2002 19:09:43 +0100 (MET)

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)
                 (const :tag "All Vobs" t)))

(defcustom cs-autolist-recent-objects2 "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")
                 (const :tag "All Vobs" t)))



reply via email to

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