Broken customize

[Tim Cross <tcross@xxxxxxxxxxx>]

FYI it appears that customize is broken under recent emacspeak svn versions. 

I've encountered two problems - one minor and the other more serious. 

When using customize, hitting tab to move to the next control triggers the
following backtrace -

Debugger entered--Lisp error: (error "Attempt to modify read-only object")
  ad-Orig-put-text-property(0 12 personality acss-a7-p7-s6 "Font weight.")
  put-text-property(0 12 personality acss-a7-p7-s6 "Font weight.")
  emacspeak-widget-help-menu-choice((choice :tag "Weight" :help-echo "Font weight." :value normal :args ((const :tag "black" :args nil :value ultra-bold) (const :tag "bold" :args nil :value bold) (const :tag "book" :args nil :value semi-light) (const :tag "demibold" :args nil :value semi-bold) (const :tag "extralight" :args nil :value extra-light) (const :tag "extrabold" :args nil :value extra-bold) (const :tag "heavy" :args nil :value extra-bold) (const :tag "light" :args nil :value light) (const :tag "medium" :args nil :value normal) (const :tag "normal" :args nil :value normal) (const :tag "regular" :args nil :value normal) (const :tag "semibold" :args nil :value semi-bold) (const :tag "semilight" :args nil :value semi-light) (const :tag "ultralight" :args nil :value ultra-light) (const :tag "ultrabold" :args nil :value ultra-bold)) :parent (group :inline t :sibling-args nil :args (... ...) :deactivate custom-face-edit-deactivate :activate custom-face-edit-activate :delete custom-face-edit-delete :parent (custom-face-edit :tag "\n Attributes" :args ... :value ... :parent ... :indent 13 :buttons ... :children ... :from #<marker (moves after insertion) at 934 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1389 in *Customize Face: Minibuffer Prompt*>) :indent 17 :children (... #0) :from #<marker (moves after insertion) at 1037 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1063 in *Customize Face: Minibuffer Prompt*> :buttons nil :inactive nil :button (checkbox :value t :help-echo "Control whether this attribute has any effect." :parent ... :indent 17 :off-glyph ... :suppress-face t :button-overlay #<overlay from 1033 to 1036 in *Customize Face: Minibuffer Prompt*> :from #<marker (moves after insertion) at 1033 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1036 in *Customize Face: Minibuffer Prompt*> :children nil :buttons nil :on-glyph ...) :value (:weight normal)) :indent 17 :button-overlay #<overlay from 1045 to 1055 in *Customize Face: Minibuffer Prompt*> :sample-overlay #<overlay from 1037 to 1043 in *Customize Face: Minibuffer Prompt*> :children ((const :tag "medium" :args nil :value normal :parent #0 :indent 17 :from #<marker (moves after insertion) at 1056 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1063 in *Customize Face: Minibuffer Prompt*>)) :choice (const :tag "medium" :args nil :value normal) :from #<marker (moves after insertion) at 1037 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1063 in *Customize Face: Minibuffer Prompt*>))
  emacspeak-widget-summarize((choice :tag "Weight" :help-echo "Font weight." :value normal :args ((const :tag "black" :args nil :value ultra-bold) (const :tag "bold" :args nil :value bold) (const :tag "book" :args nil :value semi-light) (const :tag "demibold" :args nil :value semi-bold) (const :tag "extralight" :args nil :value extra-light) (const :tag "extrabold" :args nil :value extra-bold) (const :tag "heavy" :args nil :value extra-bold) (const :tag "light" :args nil :value light) (const :tag "medium" :args nil :value normal) (const :tag "normal" :args nil :value normal) (const :tag "regular" :args nil :value normal) (const :tag "semibold" :args nil :value semi-bold) (const :tag "semilight" :args nil :value semi-light) (const :tag "ultralight" :args nil :value ultra-light) (const :tag "ultrabold" :args nil :value ultra-bold)) :parent (group :inline t :sibling-args nil :args (... ...) :deactivate custom-face-edit-deactivate :activate custom-face-edit-activate :delete custom-face-edit-delete :parent (custom-face-edit :tag "\n Attributes" :args ... :value ... :parent ... :indent 13 :buttons ... :children ... :from #<marker (moves after insertion) at 934 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1389 in *Customize Face: Minibuffer Prompt*>) :indent 17 :children (... #0) :from #<marker (moves after insertion) at 1037 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1063 in *Customize Face: Minibuffer Prompt*> :buttons nil :inactive nil :button (checkbox :value t :help-echo "Control whether this attribute has any effect." :parent ... :indent 17 :off-glyph ... :suppress-face t :button-overlay #<overlay from 1033 to 1036 in *Customize Face: Minibuffer Prompt*> :from #<marker (moves after insertion) at 1033 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1036 in *Customize Face: Minibuffer Prompt*> :children nil :buttons nil :on-glyph ...) :value (:weight normal)) :indent 17 :button-overlay #<overlay from 1045 to 1055 in *Customize Face: Minibuffer Prompt*> :sample-overlay #<overlay from 1037 to 1043 in *Customize Face: Minibuffer Prompt*> :children ((const :tag "medium" :args nil :value normal :parent #0 :indent 17 :from #<marker (moves after insertion) at 1056 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1063 in *Customize Face: Minibuffer Prompt*>)) :choice (const :tag "medium" :args nil :value normal) :from #<marker (moves after insertion) at 1037 in *Customize Face: Minibuffer Prompt*> :to #<marker at 1063 in *Customize Face: Minibuffer Prompt*>))
  widget-forward(1)
  call-interactively(widget-forward)

This is not a show stopper. Hitting q to exit the backtrace and then you can
continue. 

However, a more serious problem is that the option to save customize settings
is gone. After making changes, you cannot save them to your .emacs - all you
can do is set them for the current session. Hitting tab to bring up the
completions list shows no completion to save changes for future use.

I've tried this without emacspeak loaded and both of the above problems do not
occur. I've verified this behavior with two different versions of emacs, 
emacs 22.1.1 (the debian package) and emacs 22.1.50.1 (built from current CVS
emacs). 

The version of emacspeak I am running is 26.0 revision 5037M, checked out
today. 

Note that I think the error thrown when using tab has ben around for a while.
I'm running with debug on error enabled. However, the problem of not being able
to save customize changes to your .emacs has only been introduced in the last
week or so (I was able to use customize last week). 

-- 
Tim Cross
tcross@xxxxxxxxxxx

There are two types of people in IT - those who do not manage what they 
understand and those who do not understand what they manage.N?§²æìr¸?yúè?Ø^zf?²???X¬¶?Ü?©à{*.­§]­ë,¢{ayé?rÊ^jIb²Û?Ù??[hzf?²???·ª¹ë-rËڲƫyÛ°?ØZ²æãyËh~éì¹»®&Þ¢¸^?