From xemacs-m  Tue Jul 22 05:24:14 1997
Received: from steadfast.teradyne.com (steadfast.teradyne.com [131.101.1.200])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id FAA00007
	for <xemacs-beta@xemacs.org>; Tue, 22 Jul 1997 05:24:13 -0500 (CDT)
Received: from engine.ecf.teradyne.com (engine.ecf.teradyne.com [131.101.192.6]) by steadfast.teradyne.com (8.7.1/8.7.1) with ESMTP id GAA07689 for <xemacs-beta@xemacs.org>; Tue, 22 Jul 1997 06:27:38 -0400 (EDT)
Received: from tomorrow.eng.ecf.teradyne.com. (tomorrow.ecf.teradyne.com [131.101.192.7]) by engine.ecf.teradyne.com (8.7.1/8.7.1) with SMTP id MAA04027; Tue, 22 Jul 1997 12:22:50 +0200 (MET DST)
Received: by tomorrow.eng.ecf.teradyne.com. (SMI-8.6/SMI-SVR4)
	id MAA00874; Tue, 22 Jul 1997 12:22:49 +0200
To: xemacs-beta@xemacs.org
Subject: Cannot `customize' vc-initial-comment
X-Face: 4[iHdXiTu\V3u[~\I)<f9HC);%~nG8`oUqv#uzvs6=\V{AjN6Sn
 c/qi;YLwRmEbt8Y*=j5n(urqY@chPh@J'D"QlqD!C8>*}#kYF[-tYl3VZga/HSOP|K,{L
 Rtu@f0y/=O&Cu}\:~d|P$JON?pn?j,&CnPb1z#/TL9bkAJwyol&a:SvYj-VYbM=Dtxhk9
 =w|R6U3_;SH&B<Mfy6Q%#
Mime-Version: 1.0 (generated by tm-edit 7.108)
Content-Type: multipart/mixed;
 boundary="Multipart_Tue_Jul_22_12:22:48_1997-1"
Content-Transfer-Encoding: 7bit
From: Adrian Aichner <aichner@ecf.teradyne.com>
Date: 22 Jul 1997 12:22:49 +0200
Message-ID: <rxslo2zbd3a.fsf@tomorrow.ecf.teradyne.com>
Lines: 87
X-Mailer: Gnus v5.4.63/XEmacs 20.3(beta14) - "Vienna"

--Multipart_Tue_Jul_22_12:22:48_1997-1
Content-Type: text/plain; charset=US-ASCII


Greetings!

I checked and found vc.el not to be customized.

Running

xemacs -q -no-site-file -l ~/el/c-vc-i-c.el


--Multipart_Tue_Jul_22_12:22:48_1997-1
Content-Type: application/octet-stream; type=emacs-lisp
Content-Disposition: attachment; filename="c-vc-i-c.el"
Content-Transfer-Encoding: 7bit

(setq debug-on-error t)
;; vc.el has not been customized.
(load "vc")
(customize-variable 'vc-initial-comment)

--Multipart_Tue_Jul_22_12:22:48_1997-1
Content-Type: text/plain; charset=US-ASCII


TABing to the value nil,

DELETE DELETE DELETE t

TABing to Set for Current Session

Hitting RETURN

Here are my keystrokes from startup to the *backtrace* occurence:

Recent keystrokes:

TAB TAB TAB TAB TAB TAB TAB TAB TAB C-d C-d C-d t TAB 
TAB TAB TAB RET

I got following *Backtrace*.

What did I do wrong?

Adrian


--Multipart_Tue_Jul_22_12:22:48_1997-1
Content-Type: application/octet-stream
Content-Disposition: attachment; filename="*Backtrace*"
Content-Transfer-Encoding: 7bit

Signaling: (error "Junk at end of expression: 
   [State]: you have edited the value as text, but you have not set the option.")
  signal(error ("Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option."))
  cerror("%s" "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option.")
  apply(cerror ("%s" "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option."))
  error("%s" "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option.")
  custom-variable-set((custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ((sexp :error "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option." :to #<marker at 387 in *Customize Option: Vc Initial Comment*> :from #<marker at 384 in *Customize Option: Vc Initial Comment*> :field-overlay #<extent [385, 467] local-map keymap field overlay [385, 467] 0x5daf90 in buffer *Customize Option: Vc Initial Comment*> :indent 0 :parent ... :value "nil" :format " %v")) :buttons ((documentation-string :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 467 in *Customize Option: Vc Initial Comment*> :buttons nil :doc-overlay #<extent (467, 532) widget-doc overlay (467, 532) 0x5dad0c in buffer *Customize Option: Vc Initial Comment*> :parent ... :indent 0 :value "If non-nil, prompt for initial comment when a fil!
!
e is registered." :args nil) (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children ... :indent 0 :parent ... :args ...) (visibility :to #<marker at 384 in *Customize Option: Vc Initial Comment*> :from #<marker at 383 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (383, 384) H help-echo balloon-help button overlay (383, 384) H 0x5daa88 in buffer *Customize Option: Vc Initial Comment*> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x1000>0xfff> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xff9>0xff8> :indent 0 :parent ... :action custom-toggle-parent :help-echo "Hide the value of this option." :value t :args nil) (item :to #<marker at 382 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :sample-overlay #<extent (363, 381) overlay (!
!
363, 381) 0x5da970 in buffer *Customize Option: Vc Initial Commen

t*> :indent 0 :parent ... :sample-face custom-variable-tag-face :button-face custom-variable-button-face :mouse-down-action custom-tag-mouse-down-action :help-echo "Change value of this option." :action custom-tag-action :format "%{%t%}:" :value "Vc Initial Comment" :args nil)) :custom-form edit :custom-magic (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children (...) :indent 0 :parent (custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ... :buttons ... :custom-form edit :custom-magic ... :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t) :args (nil)) :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t))
  apply(custom-variable-set (custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ((sexp :error "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option." :to #<marker at 387 in *Customize Option: Vc Initial Comment*> :from #<marker at 384 in *Customize Option: Vc Initial Comment*> :field-overlay #<extent [385, 467] local-map keymap field overlay [385, 467] 0x5daf90 in buffer *Customize Option: Vc Initial Comment*> :indent 0 :parent ... :value "nil" :format " %v")) :buttons ((documentation-string :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 467 in *Customize Option: Vc Initial Comment*> :buttons nil :doc-overlay #<extent (467, 532) widget-doc overlay (467, 532) 0x5dad0c in buffer *Customize Option: Vc Initial Comment*> :parent ... :indent 0 :value "If non-nil, prompt for initial comment when!
!
 a file is registered." :args nil) (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children ... :indent 0 :parent ... :args ...) (visibility :to #<marker at 384 in *Customize Option: Vc Initial Comment*> :from #<marker at 383 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (383, 384) H help-echo balloon-help button overlay (383, 384) H 0x5daa88 in buffer *Customize Option: Vc Initial Comment*> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x1000>0xfff> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xff9>0xff8> :indent 0 :parent ... :action custom-toggle-parent :help-echo "Hide the value of this option." :value t :args nil) (item :to #<marker at 382 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :sample-overlay #<extent (363, 381) ove!
!
rlay (363, 381) 0x5da970 in buffer *Customize Option: Vc Initial 

Comment*> :indent 0 :parent ... :sample-face custom-variable-tag-face :button-face custom-variable-button-face :mouse-down-action custom-tag-mouse-down-action :help-echo "Change value of this option." :action custom-tag-action :format "%{%t%}:" :value "Vc Initial Comment" :args nil)) :custom-form edit :custom-magic (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children (...) :indent 0 :parent (custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ... :buttons ... :custom-form edit :custom-magic ... :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t) :args (nil)) :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t) nil)
  widget-apply((custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ((sexp :error "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option." :to #<marker at 387 in *Customize Option: Vc Initial Comment*> :from #<marker at 384 in *Customize Option: Vc Initial Comment*> :field-overlay #<extent [385, 467] local-map keymap field overlay [385, 467] 0x5daf90 in buffer *Customize Option: Vc Initial Comment*> :indent 0 :parent ... :value "nil" :format " %v")) :buttons ((documentation-string :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 467 in *Customize Option: Vc Initial Comment*> :buttons nil :doc-overlay #<extent (467, 532) widget-doc overlay (467, 532) 0x5dad0c in buffer *Customize Option: Vc Initial Comment*> :parent ... :indent 0 :value "If non-nil, prompt for initial comment when a file is re!
!
gistered." :args nil) (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children ... :indent 0 :parent ... :args ...) (visibility :to #<marker at 384 in *Customize Option: Vc Initial Comment*> :from #<marker at 383 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (383, 384) H help-echo balloon-help button overlay (383, 384) H 0x5daa88 in buffer *Customize Option: Vc Initial Comment*> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x1000>0xfff> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xff9>0xff8> :indent 0 :parent ... :action custom-toggle-parent :help-echo "Hide the value of this option." :value t :args nil) (item :to #<marker at 382 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :sample-overlay #<extent (363, 381) overlay (363, 38!
!
1) 0x5da970 in buffer *Customize Option: Vc Initial Comment*> :in

dent 0 :parent ... :sample-face custom-variable-tag-face :button-face custom-variable-button-face :mouse-down-action custom-tag-mouse-down-action :help-echo "Change value of this option." :action custom-tag-action :format "%{%t%}:" :value "Vc Initial Comment" :args nil)) :custom-form edit :custom-magic (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children (...) :indent 0 :parent (custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ... :buttons ... :custom-form edit :custom-magic ... :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t) :args (nil)) :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t) :custom-set)
  #<compiled-function (from "cus-edit.elc") (child) "...(21)" [widget-get child :custom-state modified widget-apply :custom-set] 3>((custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ((sexp :error "Junk at end of expression: \n   [State]: you have edited the value as text, but you have not set the option." :to #<marker at 387 in *Customize Option: Vc Initial Comment*> :from #<marker at 384 in *Customize Option: Vc Initial Comment*> :field-overlay #<extent [385, 467] local-map keymap field overlay [385, 467] 0x5daf90 in buffer *Customize Option: Vc Initial Comment*> :indent 0 :parent ... :value "nil" :format " %v")) :buttons ((documentation-string :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 467 in *Customize Option: Vc Initial Comment*> :buttons nil :doc-overlay #<extent (467, 532) widget-doc overlay (467, 532) 0x5dad0c in buffer *Customiz!
!
e Option: Vc Initial Comment*> :parent ... :indent 0 :value "If non-nil, prompt for initial comment when a file is registered." :args nil) (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children ... :indent 0 :parent ... :args ...) (visibility :to #<marker at 384 in *Customize Option: Vc Initial Comment*> :from #<marker at 383 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (383, 384) H help-echo balloon-help button overlay (383, 384) H 0x5daa88 in buffer *Customize Option: Vc Initial Comment*> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0x1000>0xfff> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xff9>0xff8> :indent 0 :parent ... :action custom-toggle-parent :help-echo "Hide the value of this option." :value t :args nil) (item :to #<marker at 382 in *Customize Option: Vc Initial Comment*> !
!
:from #<marker at 363 in *Customize Option: Vc Initial Comment*> 

:sample-overlay #<extent (363, 381) overlay (363, 381) 0x5da970 in buffer *Customize Option: Vc Initial Comment*> :indent 0 :parent ... :sample-face custom-variable-tag-face :button-face custom-variable-button-face :mouse-down-action custom-tag-mouse-down-action :help-echo "Change value of this option." :action custom-tag-action :format "%{%t%}:" :value "Vc Initial Comment" :args nil)) :custom-form edit :custom-magic (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children (...) :indent 0 :parent (custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children ... :buttons ... :custom-form edit :custom-magic ... :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t) :args (nil)) :value vc-initial-comment :tag "Vc Initial Comment!
!
" :custom-state modified :documentation-shown t))
  mapcar(#<compiled-function (from "cus-edit.elc") (child) "...(21)" [widget-get child :custom-state modified widget-apply :custom-set] 3> ((custom-variable :to #<marker at 533 in *Customize Option: Vc Initial Comment*> :from #<marker at 363 in *Customize Option: Vc Initial Comment*> :children (...) :buttons (... ... ... ...) :custom-form edit :custom-magic (custom-magic :value nil :buttons nil :to #<marker at 467 in *Customize Option: Vc Initial Comment*> :from #<marker at 387 in *Customize Option: Vc Initial Comment*> :children ... :indent 0 :parent ... :args ...) :value vc-initial-comment :tag "Vc Initial Comment" :custom-state modified :documentation-shown t)))
  Custom-set()
  #<compiled-function (from "cus-edit.elc") (widget &optional event) "...(5)" [Custom-set] 1>((push-button :to #<marker at 348 in *Customize Option: Vc Initial Comment*> :from #<marker at 347 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (347, 348) H help-echo balloon-help button overlay (347, 348) H 0x3e8ac0 in buffer *Customize Option: Vc Initial Comment*> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0xf72>0xf71> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0xf6b>0xf6a> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xf64>0xf63> :action #<compiled-function (from "cus-edit.elc") (widget &optional event) "...(5)" [Custom-set] 1> :help-echo "Make your editing in this buffer take effect for this session." :tag "Set for Current Session") nil)
  apply(#<compiled-function (from "cus-edit.elc") (widget &optional event) "...(5)" [Custom-set] 1> (push-button :to #<marker at 348 in *Customize Option: Vc Initial Comment*> :from #<marker at 347 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (347, 348) H help-echo balloon-help button overlay (347, 348) H 0x3e8ac0 in buffer *Customize Option: Vc Initial Comment*> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0xf72>0xf71> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0xf6b>0xf6a> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xf64>0xf63> :action #<compiled-function (from "cus-edit.elc") (widget &optional event) "...(5)" [Custom-set] 1> :help-echo "Make your editing in this buffer take effect for this session." :tag "Set for Current Session") nil)
  widget-apply((push-button :to #<marker at 348 in *Customize Option: Vc Initial Comment*> :from #<marker at 347 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (347, 348) H help-echo balloon-help button overlay (347, 348) H 0x3e8ac0 in buffer *Customize Option: Vc Initial Comment*> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0xf72>0xf71> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0xf6b>0xf6a> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xf64>0xf63> :action #<compiled-function (from "cus-edit.elc") (widget &optional event) "...(5)" [Custom-set] 1> :help-echo "Make your editing in this buffer take effect for this session." :tag "Set for Current Session") :action nil)
  widget-apply-action((push-button :to #<marker at 348 in *Customize Option: Vc Initial Comment*> :from #<marker at 347 in *Customize Option: Vc Initial Comment*> :button-overlay #<extent (347, 348) H help-echo balloon-help button overlay (347, 348) H 0x3e8ac0 in buffer *Customize Option: Vc Initial Comment*> :glyph-inactive #<glyph (buffer) #<image-specifier global=... fallback=... 0xf72>0xf71> :glyph-down #<glyph (buffer) #<image-specifier global=... fallback=... 0xf6b>0xf6a> :glyph-up #<glyph (buffer) #<image-specifier global=... fallback=... 0xf64>0xf63> :action #<compiled-function (from "cus-edit.elc") (widget &optional event) "...(5)" [Custom-set] 1> :help-echo "Make your editing in this buffer take effect for this session." :tag "Set for Current Session") nil)
  widget-button-press(347)
  call-interactively(widget-button-press)

--Multipart_Tue_Jul_22_12:22:48_1997-1
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable


-- 
                            Adrian Aichner
                        Applications Engineer
  Teradyne GmbH
  Semiconductor Test Group    Telephone +49/89/41861(0)-208
  Dingolfinger Stra=DFe 2       Fax       +49/89/41861-217
  D-81673 M=DCNCHEN             E-mail    aichner@ecf.teradyne.com

--Multipart_Tue_Jul_22_12:22:48_1997-1--

