From xemacs-m  Wed Apr 16 02:55:38 1997
Received: from elc1.dina.kvl.dk (elc1.dina.kvl.dk [130.225.40.228])
	by xemacs.org (8.8.5/8.8.5) with SMTP id CAA07786
	for <xemacs-beta@xemacs.org>; Wed, 16 Apr 1997 02:55:37 -0500 (CDT)
Received: from zuse.dina.kvl.dk (zuse.dina.kvl.dk [130.225.40.245]) by elc1.dina.kvl.dk (8.6.12/8.6.4) with ESMTP id JAA09699; Wed, 16 Apr 1997 09:55:21 +0200
Received: (abraham@localhost) by zuse.dina.kvl.dk (8.6.12/8.6.4) id JAA13174; Wed, 16 Apr 1997 09:55:33 +0200
Sender: abraham@dina.kvl.dk
To: xemacs-beta@xemacs.org
Subject: Re: customized sound.el
References: <199704160303.XAA06119@beavis.bayserve.net>
Organization: The Church of Emacs
X-Face: +kRV2]2q}lixHkE{U)mY#+6]{AH=yN~S9@IFiOa@X6?GM<U{B+4e{k79.Ya{~':DblFPCg$
 @60,BfLv2@SKZ19cMWK0/C'v;tM:|6B'R}U1rp6CL&kN({9<zF/V{:JCg27yC)9oZjeqcQawzKfiNL
 t9}`vjmK["dRQC/qGFQq"%u|Q`:6{"Rz}b(dnl_"3$Jtqimi>|8MBp/
From: Per Abrahamsen <abraham@dina.kvl.dk>
Date: 16 Apr 1997 09:55:33 +0200
In-Reply-To: Jeff Miller's message of Tue, 15 Apr 1997 23:03:41 -0400
Message-ID: <rjd8rve70q.fsf@zuse.dina.kvl.dk>
Lines: 25
X-Mailer: Gnus v5.4.37/Emacs 19.34
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit


Jeff Miller <jmiller@bayserve.net> writes:

>      :type '(repeat  (sexp :tag "Sound")
>		      )
>      )

That's too easy.  Try this:

  :type '(repeat (group (symbol :tag "Name")
			(checklist :inline t
				   :greedy t
				   (group :inline t
					  (const :format "" :value :sound)
					  (symbol :tag "Sound"))
				   (group :inline t
					  (const :format "" :value :volume)
					  (integer :tag "Volume"))
				   (group :inline t
					  (const :format "" :value :pitch)
					  (integer :tag "Pitch"))
				   (group :inline t
					  (const :format "" :value :duration)
					  (integer :tag "Duration"))))))

