[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Bug in customize-face
From: |
Jesper Harder |
Subject: |
Bug in customize-face |
Date: |
Mon, 29 Dec 2003 17:10:38 +0100 |
User-agent: |
Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3.50 (gnu/linux) |
`M-x customize-face RET bold RET' gives me this backtrace:
Debugger entered--Lisp error: (void-function nil)
nil((group :inline t :sibling-args nil :args ((const :format "" :value
:family) (string :tag "Font Family" :help-echo "Font family or fontset alias
name." :value "")) :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete :parent
(custom-face-edit :args (... ... ... ... ... ... ... ... ... ... ... ... ...
...) :value (:weight bold) :parent (group :args ... :value ... :parent ...
:indent 0) :indent 12) :indent 16 :children ((const :format "" :value :family
:parent #0 :indent 16 :from #<marker (moves after insertion) at 595 in
*Customize Face: Bold*> :to #<marker at 581 in *Customize Face: Bold*>) (string
:tag "Font Family" :help-echo "Font family or fontset alias name." :value ""
:parent #0 :indent 16 :sample-overlay #<overlay from 581 to 592 in *Customize
Face: Bold*> :field-overlay ... :from #<marker (moves after insertion) at 581
in *Customize Face: Bold*> :to #<marker at 595 in *Customize Face: Bold*>))
:from #<marker (moves after insertion) at 581 in *Customize Face: Bold*> :to
#<marker at 595 in *Customize Face: Bold*>))
widget-apply((group :inline t :sibling-args nil :args ((const :format ""
:value :family) (string :tag "Font Family" :help-echo "Font family or fontset
alias name." :value "")) :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete :parent
(custom-face-edit :args (... ... ... ... ... ... ... ... ... ... ... ... ...
...) :value (:weight bold) :parent (group :args ... :value ... :parent ...
:indent 0) :indent 12) :indent 16 :children ((const :format "" :value :family
:parent #0 :indent 16 :from #<marker (moves after insertion) at 595 in
*Customize Face: Bold*> :to #<marker at 581 in *Customize Face: Bold*>) (string
:tag "Font Family" :help-echo "Font family or fontset alias name." :value ""
:parent #0 :indent 16 :sample-overlay #<overlay from 581 to 592 in *Customize
Face: Bold*> :field-overlay ... :from #<marker (moves after insertion) at 581
in *Customize Face: Bold*> :to #<marker at 595 in *Customize Face: Bold*>))
:from #<marker (moves after insertion) at 581 in *Customize Face: Bold*> :to
#<marker at 595 in *Customize Face: Bold*>) :value-delete)
widget-default-delete((group :inline t :sibling-args nil :args ((const
:format "" :value :family) (string :tag "Font Family" :help-echo "Font family
or fontset alias name." :value "")) :deactivate custom-face-edit-deactivate
:activate custom-face-edit-activate :delete custom-face-edit-delete :parent
(custom-face-edit :args (... ... ... ... ... ... ... ... ... ... ... ... ...
...) :value (:weight bold) :parent (group :args ... :value ... :parent ...
:indent 0) :indent 12) :indent 16 :children ((const :format "" :value :family
:parent #0 :indent 16 :from #<marker (moves after insertion) at 595 in
*Customize Face: Bold*> :to #<marker at 581 in *Customize Face: Bold*>) (string
:tag "Font Family" :help-echo "Font family or fontset alias name." :value ""
:parent #0 :indent 16 :sample-overlay #<overlay from 581 to 592 in *Customize
Face: Bold*> :field-overlay ... :from #<marker (moves after insertion) at 581
in *Customize Face: Bold*> :to #<marker at 595 in *Customize Face: Bold*>))
:from #<marker (moves after insertion) at 581 in *Customize Face: Bold*> :to
#<marker at 595 in *Customize Face: Bold*>))
custom-face-edit-deactivate((group :inline t :sibling-args nil :args ((const
:format "" :value :family) (string :tag "Font Family" :help-echo "Font family
or fontset alias name." :value "")) :deactivate custom-face-edit-deactivate
:activate custom-face-edit-activate :delete custom-face-edit-delete :parent
(custom-face-edit :args (... ... ... ... ... ... ... ... ... ... ... ... ...
...) :value (:weight bold) :parent (group :args ... :value ... :parent ...
:indent 0) :indent 12) :indent 16 :children ((const :format "" :value :family
:parent #0 :indent 16 :from #<marker (moves after insertion) at 595 in
*Customize Face: Bold*> :to #<marker at 581 in *Customize Face: Bold*>) (string
:tag "Font Family" :help-echo "Font family or fontset alias name." :value ""
:parent #0 :indent 16 :sample-overlay #<overlay from 581 to 592 in *Customize
Face: Bold*> :field-overlay ... :from #<marker (moves after insertion) at 581
in *Customize Face: Bold*> :to #<marker at 595 in *Customize Face: Bold*>))
:from #<marker (moves after insertion) at 581 in *Customize Face: Bold*> :to
#<marker at 595 in *Customize Face: Bold*>))
widget-apply((group :inline t :sibling-args nil :args ((const :format ""
:value :family) (string :tag "Font Family" :help-echo "Font family or fontset
alias name." :value "")) :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete :parent
(custom-face-edit :args (... ... ... ... ... ... ... ... ... ... ... ... ...
...) :value (:weight bold) :parent (group :args ... :value ... :parent ...
:indent 0) :indent 12) :indent 16 :children ((const :format "" :value :family
:parent #0 :indent 16 :from #<marker (moves after insertion) at 595 in
*Customize Face: Bold*> :to #<marker at 581 in *Customize Face: Bold*>) (string
:tag "Font Family" :help-echo "Font family or fontset alias name." :value ""
:parent #0 :indent 16 :sample-overlay #<overlay from 581 to 592 in *Customize
Face: Bold*> :field-overlay ... :from #<marker (moves after insertion) at 581
in *Customize Face: Bold*> :to #<marker at 595 in *Customize Face: Bold*>))
:from #<marker (moves after insertion) at 581 in *Customize Face: Bold*> :to
#<marker at 595 in *Customize Face: Bold*>) :deactivate)
widget-checklist-add-item((custom-face-edit :args ((group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete)) :value (:weight
bold) :parent (group :args (... ...) :value (t ...) :parent
(custom-face-selected :args ... :value ... :parent ... :indent 0) :indent 0)
:indent 12) (group :inline t :sibling-args nil :args ((const :format "" :value
:family) (string :tag "Font Family" :help-echo "Font family or fontset alias
name." :value "")) :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) nil)
widget-checklist-value-create((custom-face-edit :args ((group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete)) :value (:weight
bold) :parent (group :args (... ...) :value (t ...) :parent
(custom-face-selected :args ... :value ... :parent ... :indent 0) :indent 0)
:indent 12))
widget-apply((custom-face-edit :args ((group :inline t :sibling-args nil
:args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete)) :value (:weight
bold) :parent (group :args (... ...) :value (t ...) :parent
(custom-face-selected :args ... :value ... :parent ... :indent 0) :indent 0)
:indent 12) :value-create)
widget-default-create((custom-face-edit :args ((group :inline t :sibling-args
nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete)) :value (:weight
bold) :parent (group :args (... ...) :value (t ...) :parent
(custom-face-selected :args ... :value ... :parent ... :indent 0) :indent 0)
:indent 12))
widget-apply((custom-face-edit :args ((group :inline t :sibling-args nil
:args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete)) :value (:weight
bold) :parent (group :args (... ...) :value (t ...) :parent
(custom-face-selected :args ... :value ... :parent ... :indent 0) :indent 0)
:indent 12) :create)
widget-create-child-value((group :args ((sexp :format "" :value "nil")
(custom-face-edit :args ...)) :value (t (:weight bold)) :parent
(custom-face-selected :args (... ... ...) :value (...) :parent (custom-face
:documentation-shown t :custom-state unknown :tag "Bold" :value bold
:sample-overlay #<overlay from 447 to 451 in *Customize Face: Bold*>
:custom-magic ... :buttons ... :comment-widget ... :custom-form selected)
:indent 0) :indent 0) (custom-face-edit :args ((group :inline t :sibling-args
nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete) (group :inline t
:sibling-args nil :args ... :deactivate custom-face-edit-deactivate :activate
custom-face-edit-activate :delete custom-face-edit-delete))) (:weight bold))
widget-group-value-create((group :args ((sexp :format "" :value "nil")
(custom-face-edit :args ...)) :value (t (:weight bold)) :parent
(custom-face-selected :args (... ... ...) :value (...) :parent (custom-face
:documentation-shown t :custom-state unknown :tag "Bold" :value bold
:sample-overlay #<overlay from 447 to 451 in *Customize Face: Bold*>
:custom-magic ... :buttons ... :comment-widget ... :custom-form selected)
:indent 0) :indent 0))
widget-apply((group :args ((sexp :format "" :value "nil") (custom-face-edit
:args ...)) :value (t (:weight bold)) :parent (custom-face-selected :args (...
... ...) :value (...) :parent (custom-face :documentation-shown t :custom-state
unknown :tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in
*Customize Face: Bold*> :custom-magic ... :buttons ... :comment-widget ...
:custom-form selected) :indent 0) :indent 0) :value-create)
widget-default-create((group :args ((sexp :format "" :value "nil")
(custom-face-edit :args ...)) :value (t (:weight bold)) :parent
(custom-face-selected :args (... ... ...) :value (...) :parent (custom-face
:documentation-shown t :custom-state unknown :tag "Bold" :value bold
:sample-overlay #<overlay from 447 to 451 in *Customize Face: Bold*>
:custom-magic ... :buttons ... :comment-widget ... :custom-form selected)
:indent 0) :indent 0))
widget-apply((group :args ((sexp :format "" :value "nil") (custom-face-edit
:args ...)) :value (t (:weight bold)) :parent (custom-face-selected :args (...
... ...) :value (...) :parent (custom-face :documentation-shown t :custom-state
unknown :tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in
*Customize Face: Bold*> :custom-magic ... :buttons ... :comment-widget ...
:custom-form selected) :indent 0) :indent 0) :create)
widget-create-child-value((custom-face-selected :args ((repeat :format ""
:inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))
:value ((t ...)) :parent (custom-face :documentation-shown t :custom-state
unknown :tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in
*Customize Face: Bold*> :custom-magic (custom-magic :args ... :parent #1
:indent 0 :children ... :from #<marker (moves after insertion) at 477 in
*Customize Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>)
:buttons (... ... ... ... ...) :comment-widget (custom-comment :parent #1
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected) :indent 0)
(group :args ((sexp :format "" :value "nil") (custom-face-edit :args ...))) (t
(:weight bold)))
widget-group-value-create((custom-face-selected :args ((repeat :format ""
:inline t :args ...) (group :args ...) (repeat :format "" :inline t :args ...))
:value ((t ...)) :parent (custom-face :documentation-shown t :custom-state
unknown :tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in
*Customize Face: Bold*> :custom-magic (custom-magic :args ... :parent #1
:indent 0 :children ... :from #<marker (moves after insertion) at 477 in
*Customize Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>)
:buttons (... ... ... ... ...) :comment-widget (custom-comment :parent #1
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected) :indent 0))
widget-apply((custom-face-selected :args ((repeat :format "" :inline t :args
...) (group :args ...) (repeat :format "" :inline t :args ...)) :value ((t
...)) :parent (custom-face :documentation-shown t :custom-state unknown :tag
"Bold" :value bold :sample-overlay #<overlay from 447 to 451 in *Customize
Face: Bold*> :custom-magic (custom-magic :args ... :parent #1 :indent 0
:children ... :from #<marker (moves after insertion) at 477 in *Customize Face:
Bold*> :to #<marker at 521 in *Customize Face: Bold*>) :buttons (... ... ...
... ...) :comment-widget (custom-comment :parent #1 :value "" :indent 0 :from
#<marker at 538 in *Customize Face: Bold*> :to #<marker at 538 in *Customize
Face: Bold*>) :custom-form selected) :indent 0) :value-create)
widget-default-create((custom-face-selected :args ((repeat :format "" :inline
t :args ...) (group :args ...) (repeat :format "" :inline t :args ...)) :value
((t ...)) :parent (custom-face :documentation-shown t :custom-state unknown
:tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in *Customize
Face: Bold*> :custom-magic (custom-magic :args ... :parent #1 :indent 0
:children ... :from #<marker (moves after insertion) at 477 in *Customize Face:
Bold*> :to #<marker at 521 in *Customize Face: Bold*>) :buttons (... ... ...
... ...) :comment-widget (custom-comment :parent #1 :value "" :indent 0 :from
#<marker at 538 in *Customize Face: Bold*> :to #<marker at 538 in *Customize
Face: Bold*>) :custom-form selected) :indent 0))
widget-apply((custom-face-selected :args ((repeat :format "" :inline t :args
...) (group :args ...) (repeat :format "" :inline t :args ...)) :value ((t
...)) :parent (custom-face :documentation-shown t :custom-state unknown :tag
"Bold" :value bold :sample-overlay #<overlay from 447 to 451 in *Customize
Face: Bold*> :custom-magic (custom-magic :args ... :parent #1 :indent 0
:children ... :from #<marker (moves after insertion) at 477 in *Customize Face:
Bold*> :to #<marker at 521 in *Customize Face: Bold*>) :buttons (... ... ...
... ...) :comment-widget (custom-comment :parent #1 :value "" :indent 0 :from
#<marker at 538 in *Customize Face: Bold*> :to #<marker at 538 in *Customize
Face: Bold*>) :custom-form selected) :indent 0) :create)
widget-create-child-and-convert((custom-face :documentation-shown t
:custom-state unknown :tag "Bold" :value bold :sample-overlay #<overlay from
447 to 451 in *Customize Face: Bold*> :custom-magic (custom-magic :args (nil)
:parent #0 :indent 0 :children (...) :from #<marker (moves after insertion) at
477 in *Customize Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>)
:buttons ((custom-group-link :args nil :value basic-faces :tag "Basic Faces"
:parent #0 :indent 0 :button-overlay #<overlay from 553 to 564 in *Customize
Face: Bold*> :from #<marker (moves after insertion) at 553 in *Customize Face:
Bold*> :to #<marker at 564 in *Customize Face: Bold*>) (documentation-string
:args nil :value "Basic bold face." :indent 0 :parent #0 :doc-overlay #<overlay
from 521 to 537 in *Customize Face: Bold*> :buttons nil :from #<marker (moves
after insertion) at 521 in *Customize Face: Bold*> :to #<marker at 538 in
*Customize Face: Bold*>) (custom-magic :args ... :parent #0 :indent 0 :children
... :from #<marker (moves after insertion) at 477 in *Customize Face: Bold*>
:to #<marker at 521 in *Customize Face: Bold*>) (visibility :args nil :value t
:help-echo "Hide or show this face." :on "Hide Face" :off "Show Face" :action
custom-toggle-parent :parent #0 :indent 0 :button-overlay #<overlay from 467 to
476 in *Customize Face: Bold*> :from #<marker (moves after insertion) at 467 in
*Customize Face: Bold*> :to #<marker at 476 in *Customize Face: Bold*>) (item
:format "(%{%t%})" :sample-face bold :tag "sample" :parent #0 :indent 0
:sample-overlay #<overlay from 459 to 465 in *Customize Face: Bold*> :from
#<marker (moves after insertion) at 458 in *Customize Face: Bold*> :to #<marker
at 466 in *Customize Face: Bold*>)) :comment-widget (custom-comment :parent #0
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected)
custom-face-selected :value ((t (:weight bold))))
custom-face-value-create((custom-face :documentation-shown t :custom-state
unknown :tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in
*Customize Face: Bold*> :custom-magic (custom-magic :args (nil) :parent #0
:indent 0 :children (...) :from #<marker (moves after insertion) at 477 in
*Customize Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>)
:buttons ((custom-group-link :args nil :value basic-faces :tag "Basic Faces"
:parent #0 :indent 0 :button-overlay #<overlay from 553 to 564 in *Customize
Face: Bold*> :from #<marker (moves after insertion) at 553 in *Customize Face:
Bold*> :to #<marker at 564 in *Customize Face: Bold*>) (documentation-string
:args nil :value "Basic bold face." :indent 0 :parent #0 :doc-overlay #<overlay
from 521 to 537 in *Customize Face: Bold*> :buttons nil :from #<marker (moves
after insertion) at 521 in *Customize Face: Bold*> :to #<marker at 538 in
*Customize Face: Bold*>) (custom-magic :args ... :parent #0 :indent 0 :children
... :from #<marker (moves after insertion) at 477 in *Customize Face: Bold*>
:to #<marker at 521 in *Customize Face: Bold*>) (visibility :args nil :value t
:help-echo "Hide or show this face." :on "Hide Face" :off "Show Face" :action
custom-toggle-parent :parent #0 :indent 0 :button-overlay #<overlay from 467 to
476 in *Customize Face: Bold*> :from #<marker (moves after insertion) at 467 in
*Customize Face: Bold*> :to #<marker at 476 in *Customize Face: Bold*>) (item
:format "(%{%t%})" :sample-face bold :tag "sample" :parent #0 :indent 0
:sample-overlay #<overlay from 459 to 465 in *Customize Face: Bold*> :from
#<marker (moves after insertion) at 458 in *Customize Face: Bold*> :to #<marker
at 466 in *Customize Face: Bold*>)) :comment-widget (custom-comment :parent #0
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected))
widget-apply((custom-face :documentation-shown t :custom-state unknown :tag
"Bold" :value bold :sample-overlay #<overlay from 447 to 451 in *Customize
Face: Bold*> :custom-magic (custom-magic :args (nil) :parent #0 :indent 0
:children (...) :from #<marker (moves after insertion) at 477 in *Customize
Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>) :buttons
((custom-group-link :args nil :value basic-faces :tag "Basic Faces" :parent #0
:indent 0 :button-overlay #<overlay from 553 to 564 in *Customize Face: Bold*>
:from #<marker (moves after insertion) at 553 in *Customize Face: Bold*> :to
#<marker at 564 in *Customize Face: Bold*>) (documentation-string :args nil
:value "Basic bold face." :indent 0 :parent #0 :doc-overlay #<overlay from 521
to 537 in *Customize Face: Bold*> :buttons nil :from #<marker (moves after
insertion) at 521 in *Customize Face: Bold*> :to #<marker at 538 in *Customize
Face: Bold*>) (custom-magic :args ... :parent #0 :indent 0 :children ... :from
#<marker (moves after insertion) at 477 in *Customize Face: Bold*> :to #<marker
at 521 in *Customize Face: Bold*>) (visibility :args nil :value t :help-echo
"Hide or show this face." :on "Hide Face" :off "Show Face" :action
custom-toggle-parent :parent #0 :indent 0 :button-overlay #<overlay from 467 to
476 in *Customize Face: Bold*> :from #<marker (moves after insertion) at 467 in
*Customize Face: Bold*> :to #<marker at 476 in *Customize Face: Bold*>) (item
:format "(%{%t%})" :sample-face bold :tag "sample" :parent #0 :indent 0
:sample-overlay #<overlay from 459 to 465 in *Customize Face: Bold*> :from
#<marker (moves after insertion) at 458 in *Customize Face: Bold*> :to #<marker
at 466 in *Customize Face: Bold*>)) :comment-widget (custom-comment :parent #0
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected)
:value-create)
widget-default-create((custom-face :documentation-shown t :custom-state
unknown :tag "Bold" :value bold :sample-overlay #<overlay from 447 to 451 in
*Customize Face: Bold*> :custom-magic (custom-magic :args (nil) :parent #0
:indent 0 :children (...) :from #<marker (moves after insertion) at 477 in
*Customize Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>)
:buttons ((custom-group-link :args nil :value basic-faces :tag "Basic Faces"
:parent #0 :indent 0 :button-overlay #<overlay from 553 to 564 in *Customize
Face: Bold*> :from #<marker (moves after insertion) at 553 in *Customize Face:
Bold*> :to #<marker at 564 in *Customize Face: Bold*>) (documentation-string
:args nil :value "Basic bold face." :indent 0 :parent #0 :doc-overlay #<overlay
from 521 to 537 in *Customize Face: Bold*> :buttons nil :from #<marker (moves
after insertion) at 521 in *Customize Face: Bold*> :to #<marker at 538 in
*Customize Face: Bold*>) (custom-magic :args ... :parent #0 :indent 0 :children
... :from #<marker (moves after insertion) at 477 in *Customize Face: Bold*>
:to #<marker at 521 in *Customize Face: Bold*>) (visibility :args nil :value t
:help-echo "Hide or show this face." :on "Hide Face" :off "Show Face" :action
custom-toggle-parent :parent #0 :indent 0 :button-overlay #<overlay from 467 to
476 in *Customize Face: Bold*> :from #<marker (moves after insertion) at 467 in
*Customize Face: Bold*> :to #<marker at 476 in *Customize Face: Bold*>) (item
:format "(%{%t%})" :sample-face bold :tag "sample" :parent #0 :indent 0
:sample-overlay #<overlay from 459 to 465 in *Customize Face: Bold*> :from
#<marker (moves after insertion) at 458 in *Customize Face: Bold*> :to #<marker
at 466 in *Customize Face: Bold*>)) :comment-widget (custom-comment :parent #0
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected))
widget-apply((custom-face :documentation-shown t :custom-state unknown :tag
"Bold" :value bold :sample-overlay #<overlay from 447 to 451 in *Customize
Face: Bold*> :custom-magic (custom-magic :args (nil) :parent #0 :indent 0
:children (...) :from #<marker (moves after insertion) at 477 in *Customize
Face: Bold*> :to #<marker at 521 in *Customize Face: Bold*>) :buttons
((custom-group-link :args nil :value basic-faces :tag "Basic Faces" :parent #0
:indent 0 :button-overlay #<overlay from 553 to 564 in *Customize Face: Bold*>
:from #<marker (moves after insertion) at 553 in *Customize Face: Bold*> :to
#<marker at 564 in *Customize Face: Bold*>) (documentation-string :args nil
:value "Basic bold face." :indent 0 :parent #0 :doc-overlay #<overlay from 521
to 537 in *Customize Face: Bold*> :buttons nil :from #<marker (moves after
insertion) at 521 in *Customize Face: Bold*> :to #<marker at 538 in *Customize
Face: Bold*>) (custom-magic :args ... :parent #0 :indent 0 :children ... :from
#<marker (moves after insertion) at 477 in *Customize Face: Bold*> :to #<marker
at 521 in *Customize Face: Bold*>) (visibility :args nil :value t :help-echo
"Hide or show this face." :on "Hide Face" :off "Show Face" :action
custom-toggle-parent :parent #0 :indent 0 :button-overlay #<overlay from 467 to
476 in *Customize Face: Bold*> :from #<marker (moves after insertion) at 467 in
*Customize Face: Bold*> :to #<marker at 476 in *Customize Face: Bold*>) (item
:format "(%{%t%})" :sample-face bold :tag "sample" :parent #0 :indent 0
:sample-overlay #<overlay from 459 to 465 in *Customize Face: Bold*> :from
#<marker (moves after insertion) at 458 in *Customize Face: Bold*> :to #<marker
at 466 in *Customize Face: Bold*>)) :comment-widget (custom-comment :parent #0
:value "" :indent 0 :from #<marker at 538 in *Customize Face: Bold*> :to
#<marker at 538 in *Customize Face: Bold*>) :custom-form selected) :create)
widget-create(custom-face :documentation-shown t :custom-state unknown :tag
"Bold" :value bold)
(lambda (entry) (widget-create (nth 1 entry) :documentation-shown t
:custom-state (quote unknown) :tag (custom-unlispify-tag-name ...) :value (nth
0 entry)))((bold custom-face))
mapcar((lambda (entry) (widget-create (nth 1 entry) :documentation-shown t
:custom-state (quote unknown) :tag (custom-unlispify-tag-name ...) :value (nth
0 entry))) ((bold custom-face)))
(if (= (length options) 1) (mapcar (lambda ... ...) options) (let (... ...)
(mapcar ... options)))
(setq custom-options (if (= ... 1) (mapcar ... options) (let ... ...)))
custom-buffer-create-internal(((bold custom-face)) nil)
custom-buffer-create(((bold custom-face)) "*Customize Face: Bold*")
customize-face((bold))
* call-interactively(customize-face)
execute-extended-command(nil)
call-interactively(execute-extended-command)
In GNU Emacs 21.3.50.9 (i686-pc-linux-gnu, GTK+ Version 2.0.2)
of 2003-12-29 on defun.localdomain
configured using `configure '--with-gtk''
Important settings:
value of $LC_ALL: nil
value of $LC_COLLATE: nil
value of $LC_CTYPE: nil
value of $LC_MESSAGES: nil
value of $LC_MONETARY: nil
value of $LC_NUMERIC: nil
value of $LC_TIME: nil
value of $LANG: en_US.iso88591
locale-coding-system: iso-latin-1
default-enable-multibyte-characters: t
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Bug in customize-face,
Jesper Harder <=