From xemacs-m  Fri Apr 18 16:50:10 1997
Received: from mercury.Sun.COM (mercury.Sun.COM [192.9.25.1])
	by xemacs.org (8.8.5/8.8.5) with SMTP id QAA13037
	for <xemacs-beta@xemacs.org>; Fri, 18 Apr 1997 16:50:09 -0500 (CDT)
Received: from Corp.Sun.COM ([129.145.35.78]) by mercury.Sun.COM (SMI-8.6/mail.byaddr) with SMTP id OAA08822 for <xemacs-beta@xemacs.org>; Fri, 18 Apr 1997 14:57:13 -0700
Received: from legba.Corp.Sun.COM by Corp.Sun.COM (SMI-8.6/SMI-5.3)
	id OAA01182; Fri, 18 Apr 1997 14:49:59 -0700
Received: by legba.Corp.Sun.COM (SMI-8.6/SMI-SVR4)
	id OAA19039; Fri, 18 Apr 1997 14:49:57 -0700
To: xemacs-beta@xemacs.org
Subject: 20.1final customize-faces blows up
Mime-Version: 1.0 (generated by tm-edit 7.106)
Content-Type: multipart/mixed;
 boundary="Multipart_Fri_Apr_18_14:49:56_1997-1"
Content-Transfer-Encoding: 7bit
From: Gary.Foster@Corp.Sun.COM (Gary D. Foster)
Date: 18 Apr 1997 14:49:56 -0700
Message-ID: <bcid8rsknln.fsf@corp.Sun.COM>
Lines: 92
X-Mailer: Gnus v5.4.45/XEmacs 20.1

--Multipart_Fri_Apr_18_14:49:56_1997-1
Content-Type: text/plain; charset=US-ASCII

Clicking on the state button for a face in the customize-faces buffer
gives me the attached backtrace, and changes the state of the item to
"unknown.  You shouldn't see this".  The error I get is "Symbol's
value as variable is void: facemenu-key".

Any ideas?  Seemed to be working fine on the betas...

-- Gary F.


--Multipart_Fri_Apr_18_14:49:56_1997-1
Content-Type: application/octet-stream
Content-Disposition: attachment; filename="Backtrace"
Content-Transfer-Encoding: 8bit

Signaling: (void-variable facemenu-key)
  facemenu-update()
  load-internal("facemenu" nil t nil nil nil)
  load("facemenu" nil t nil)
  require(facemenu)
  widget-color-item-button-face-get((color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil))
  apply(widget-color-item-button-face-get (color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil) nil)
  widget-apply((color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil) :sample-face-get)
  widget-specify-sample((color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil) 1390 1396)
  widget-default-create((color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil))
  apply(widget-default-create (color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil) nil)
  widget-apply((color-item :indent 16 :parent (color :indent 16 :parent (group :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value "light blue" :args nil) :create)
  widget-create-child-and-convert((color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") color-item "light blue")
  widget-color-value-create((color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color."))
  apply(widget-color-value-create (color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") nil)
  widget-apply((color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :value-create)
  widget-default-create((color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color."))
  apply(widget-default-create (color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") nil)
  widget-apply((color :indent 16 :parent (group :indent 16 :parent (custom-face-edit :children ... :buttons ... :indent 12 :parent ... :value ... :args ...) :value (:foreground "light blue") :inline t :sibling-args nil :args (... ...)) :tag "Foreground" :value "light blue" :help-echo "Set foreground color.") :create)
  widget-create-child-value((group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) (color :tag "Foreground" :value "black" :help-echo "Set foreground color.") "light blue")
  widget-group-value-create((group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))))
  apply(widget-group-value-create (group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) nil)
  widget-apply((group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) :value-create)
  widget-default-create((group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))))
  apply(widget-default-create (group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) nil)
  widget-apply((group :indent 16 :parent (custom-face-edit :children (... ... ... ... ... ...) :buttons (... ... ... ... ... ...) :indent 12 :parent (group :indent 0 :parent ... :value ... :args ...) :value (:foreground "light blue" :underline t) :args (... ... ... ... ... ... ... ... ...)) :value (:foreground "light blue") :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) :create)
  widget-create-child-value((custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker at 12





92 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) (group :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) (:foreground "light blue"))
  widget-checklist-add-item((custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker at 12





92 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) (group :inline t :sibling-args nil :args ((const :format "" :value :foreground) (color :tag "Foreground" :value "black" :help-echo "Set foreground color."))) ((group :inline t :sibling-args nil :args (... ...)) :foreground "light blue"))
  widget-checklist-value-create((custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker a





t 1292 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))))
  apply(widget-checklist-value-create (custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<ma





rker at 1292 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) nil)
  widget-apply((custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker at 1292 in *Custom





ization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) :value-create)
  widget-default-create((custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker at 1292 i





n *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))))
  apply(widget-default-create (custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker at 





1292 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) nil)
  widget-apply((custom-face-edit :children ((group :button ... :to #<marker at 1358 in *Customization*> :from #<marker at 1344 in *Customization*> :children ... :indent 16 :parent ... :value ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1318, 1330) % evaporate overlay 0x14ce464 in buffer *Customization*> :to #<marker at 1330 in *Customization*> :from #<marker at 1318 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1294, 1304) % evaporate overlay 0x14aec64 in buffer *Customization*> :to #<marker at 1304 in *Customization*> :from #<marker at 1294 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1264, 1280) % evaporate overlay 0x149dd7c in buffer *Customization*> :to #<marker at 1280 in *Customization*> :from #<marker at 1264 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1242, 1250) % evaporate overlay 0x148ee5c in buffer *Customization*> :to #<marker at 1250 in *Customization*> :from #<marker at 1242 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...) (group :button ... :inactive #<extent (1213, 1228) % evaporate overlay 0x147d8c8 in buffer *Customization*> :to #<marker at 1228 in *Customization*> :from #<marker at 1213 in *Customization*> :children ... :indent 16 :parent ... :inline t :sibling-args nil :args ...)) :buttons ((checkbox :to #<marker at 1343 in *Customization*> :from #<marker at 1342 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value t) (checkbox :to #<marker at 1317 in *Customization*> :from #<marker at 1316 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1293 in *Customization*> :from #<marker at 1292 in *Custom





ization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1263 in *Customization*> :from #<marker at 1262 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1241 in *Customization*> :from #<marker at 1240 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil) (checkbox :to #<marker at 1212 in *Customization*> :from #<marker at 1211 in *Customization*> :indent 16 :parent ... :help-echo "Control whether this attribute have any effect." :value nil)) :indent 12 :parent (group :indent 0 :parent (custom-face-selected :indent 0 :parent ... :value ... :args ...) :value (... ...) :args (... ...)) :value (:foreground "light blue" :underline t) :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) :create)
  widget-create-child-value((group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))) (custom-face-edit :args ((group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...) (group :inline t :sibling-args nil :args ...))) (:foreground "light blue" :underline t))
  widget-group-value-create((group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))))
  apply(widget-group-value-create (group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))) nil)
  widget-apply((group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))) :value-create)
  widget-default-create((group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))))
  apply(widget-default-create (group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))) nil)
  widget-apply((group :indent 0 :parent (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :value (... ... ...) :args (... ... ...)) :value ((... ...) (:foreground "light blue" :underline t)) :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))) :create)
  widget-create-child-value((custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))) (group :args ((sexp :value "nil" :format "") (custom-face-edit :args ...))) (((class color) (background dark)) (:foreground "light blue" :underline t)))
  widget-group-value-create((custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))))
  apply(widget-group-value-create (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))) nil)
  widget-apply((custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))) :value-create)
  widget-default-create((custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))))
  apply(widget-default-create (custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))) nil)
  widget-apply((custom-face-selected :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :value ((... ...) (... ...) (t ...)) :args ((repeat :format "" :inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))) :create)
  widget-create-child-and-convert((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") custom-face-selected :value (((... ...) (:foreground "light blue" :underline t)) ((... ...) (:foreground "blue" :underline t)) (t (:underline t))))
  custom-face-value-create((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face"))
  apply(custom-face-value-create (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") nil)
  widget-apply((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") :value-create)
  widget-default-create((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face"))
  apply(widget-default-create (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") nil)
  widget-apply((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") :create)
  widget-default-value-set((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") custom-group-tag-face)
  apply(widget-default-value-set (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") custom-group-tag-face)
  widget-apply((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") :value-set custom-group-tag-face)
  widget-value-set((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") custom-group-tag-face)
  custom-redraw((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face"))
  custom-face-action((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") #<buttondown-event button2>)
  apply(custom-face-action (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") #<buttondown-event button2>)
  widget-apply((custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children (... ...) :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :buttons ((item :to #<marker at 1196 in *Customization*> :from #<marker at 1160 in *Customization*> :indent 0 :parent ... :doc "Face used for low level group tags." :format "%d" :value nil :args nil) (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) (item :to #<marker at 1115 in *Customization*> :from #<marker at 1106 in *Customization*> :indent 0 :parent ... :tag "sample" :sample-face custom-group-tag-face :format "(%{%t%})\n") (custom-level :to #<marker at 1082 in *Customization*> :from #<marker at 1081 in *Customization*> :indent 0 :parent ... :value "*" :args nil)) :value custom-group-tag-face :tag "Custom Group Tag Face") :action #<buttondown-event button2>)
  widget-choice-item-action((custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) #<buttondown-event button2>)
  apply(widget-choice-item-action (custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) #<buttondown-event button2>)
  widget-apply((custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic (custom-magic :to #<marker at 1160 in *Customization*> :from #<marker at 1115 in *Customization*> :children ... :indent 0 :parent ... :args ...) :buttons (... ... ... ...) :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :action #<buttondown-event button2>)
  widget-choice-item-action((choice-item :to #<marker in no buffer> :from #<marker in no buffer> :indent 0 :parent (custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :tag "State" :format "%[%t%]" :help-echo "Change the state of this item.") #<buttondown-event button2>)
  apply(widget-choice-item-action (choice-item :to #<marker in no buffer> :from #<marker in no buffer> :indent 0 :parent (custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :tag "State" :format "%[%t%]" :help-echo "Change the state of this item.") #<buttondown-event button2>)
  widget-apply((choice-item :to #<marker in no buffer> :from #<marker in no buffer> :indent 0 :parent (custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :tag "State" :format "%[%t%]" :help-echo "Change the state of this item.") :action #<buttondown-event button2>)
  widget-apply-action((choice-item :to #<marker in no buffer> :from #<marker in no buffer> :indent 0 :parent (custom-magic :value nil :buttons nil :to #<marker in no buffer> :from #<marker in no buffer> :children nil :indent 0 :parent (custom-face :children nil :custom-state unknown :to #<marker in no buffer> :from #<marker in no buffer> :custom-magic ... :buttons ... :value custom-group-tag-face :tag "Custom Group Tag Face") :args (nil)) :tag "State" :format "%[%t%]" :help-echo "Change the state of this item.") #<buttondown-event button2>)
  widget-button-click(#<buttondown-event button2>)
  call-interactively(widget-button-click)

--Multipart_Fri_Apr_18_14:49:56_1997-1--

