Gnus development mailing list
 help / color / mirror / Atom feed
* [19.30.94] customize & GNUS broken
@ 1996-03-11 18:36 Paul D. Smith
  1996-03-11 19:30 ` Paul D. Smith
  0 siblings, 1 reply; 2+ messages in thread
From: Paul D. Smith @ 1996-03-11 18:36 UTC (permalink / raw)


If you try to use customize when you have GNUS loaded, you'll get the
following error:

  Signaling: (void-variable as)
    (custom-face-lookup "yellow" "black" "default" as as as)
    eval((custom-face-lookup "yellow" "black" "default" as as as))
    custom-face-hack([((tag . "Customized") (compact . t) (face-tag . custom-face-hack) (eval . custom-face-eval) (data ... "\n" ... ... ... "\n" ... "              " ... "             " ...) (default custom-face-lookup "default" "default" "default" nil nil nil) (type . list)) ([... __uninitialized__ __uninitialized__ #<marker at 7108 in *Customize*> #<marker at 7158 in *Customize*>] nil [... __uninitialized__ __uninitialized__ #<marker at 7163 in *Customize*> #<marker at 7183 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7187 in *Customize*> #<marker at 7207 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7217 in *Customize*> #<marker at 7237 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7245 in *Customize*> #<marker at 7252 in *Customize*>] __uninitialized__ #<marker at 7239 in *Customize*> #<marker at 7253 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7276 in *Cu
 stomize*> #<marker at 7283 in *Cu


stomize*>] __uninitialized__ #<marker at 7268 in *Customize*> #<marker at 7284 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7309 in *Customize*> #<marker at 7316 in *Customize*>] __uninitialized__ #<marker at 7298 in *Customize*> #<marker at 7317 in *Customize*>]) __uninitialized__ #<marker at 7098 in *Customize*> #<marker at 7317 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as))
    custom-group-accept([((tag . "Customized") (compact . t) (face-tag . custom-face-hack) (eval . custom-face-eval) (data ... "\n" ... ... ... "\n" ... "              " ... "             " ...) (default custom-face-lookup "default" "default" "default" nil nil nil) (type . list)) ([... __uninitialized__ __uninitialized__ #<marker at 7108 in *Customize*> #<marker at 7158 in *Customize*>] nil [... __uninitialized__ __uninitialized__ #<marker at 7163 in *Customize*> #<marker at 7183 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7187 in *Customize*> #<marker at 7207 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7217 in *Customize*> #<marker at 7237 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7245 in *Customize*> #<marker at 7252 in *Customize*>] __uninitialized__ #<marker at 7239 in *Customize*> #<marker at 7253 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7276 in 
 *Customize*> #<marker at 7283 in 


*Customize*>] __uninitialized__ #<marker at 7268 in *Customize*> #<marker at 7284 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7309 in *Customize*> #<marker at 7316 in *Customize*>] __uninitialized__ #<marker at 7298 in *Customize*> #<marker at 7317 in *Customize*>]) __uninitialized__ #<marker at 7098 in *Customize*> #<marker at 7317 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as) t)
    custom-field-accept([((tag . "Customized") (compact . t) (face-tag . custom-face-hack) (eval . custom-face-eval) (data ... "\n" ... ... ... "\n" ... "              " ... "             " ...) (default custom-face-lookup "default" "default" "default" nil nil nil) (type . list)) ([... __uninitialized__ __uninitialized__ #<marker at 7108 in *Customize*> #<marker at 7158 in *Customize*>] nil [... __uninitialized__ __uninitialized__ #<marker at 7163 in *Customize*> #<marker at 7183 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7187 in *Customize*> #<marker at 7207 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7217 in *Customize*> #<marker at 7237 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7245 in *Customize*> #<marker at 7252 in *Customize*>] __uninitialized__ #<marker at 7239 in *Customize*> #<marker at 7253 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7276 in 
 *Customize*> #<marker at 7283 in 


*Customize*>] __uninitialized__ #<marker at 7268 in *Customize*> #<marker at 7284 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7309 in *Customize*> #<marker at 7316 in *Customize*>] __uninitialized__ #<marker at 7298 in *Customize*> #<marker at 7317 in *Customize*>]) __uninitialized__ #<marker at 7098 in *Customize*> #<marker at 7317 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as) t)
    custom-choice-accept([((type . face) (tag . "Face")) [(... ... ... ...) __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as) #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as) t)
    custom-field-accept([((type . face) (tag . "Face")) [(... ... ... ...) __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as) #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow" "black" "default" as as as) t)
    custom-group-accept([((type . pair) (compact . t) (data ... "\n            " ... "\n")) ([... ... ... #<marker at 7018 in *Customize*> #<marker at 7078 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] ... #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] nil) ((= mark gnus-canceled-mark) (custom-face-lookup "yellow" "black" "default" as as as)) #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>] ((= mark gnus-canceled-mark) (custom-face-lookup "yellow" "black" "default" as as as)) t)
    custom-pair-accept([((type . pair) (compact . t) (data ... "\n            " ... "\n")) ([... ... ... #<marker at 7018 in *Customize*> #<marker at 7078 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] ... #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] nil) ((= mark gnus-canceled-mark) (custom-face-lookup "yellow" "black" "default" as as as)) #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>] ((= mark gnus-canceled-mark) custom-face-lookup "yellow" "black" "default" as as as) t)
    custom-field-accept([((type . pair) (compact . t) (data ... "\n            " ... "\n")) ([... ... ... #<marker at 7018 in *Customize*> #<marker at 7078 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] ... #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] nil) ((= mark gnus-canceled-mark) (custom-face-lookup "yellow" "black" "default" as as as)) #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>] ((= mark gnus-canceled-mark) custom-face-lookup "yellow" "black" "default" as as as) t)
    custom-repeat-accept([((type . repeat) (header) (data ... ... ...)) ([... ... ... #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>]) ((... custom-face-lookup "yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 7322 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "yellow" "black" "default" as as as) ((and ... ...) custom-face-lookup "
 pink" "default" "default" t as as


) ((and ... ...) custom-face-lookup "pink" "default" "default" as t as) ((or ... ...) custom-face-lookup "pink" "default" "default" as as as) ((and ... ...) custom-face-lookup "dark blue" "default" "default" t as as) ((and ... ...) custom-face-lookup "SkyBlue" "default" "default" as t as) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue" "default" "default" as as as) ((and ... ...) custom-face-lookup "white" "default" "default" t as as) ((and ... ...) custom-face-lookup "white" "default" "default" as t as) ((= mark gnus-unread-mark) custom-face-lookup "white" "default" "default" as as as) ((> score default) . bold) ((< score default) . italic)) t)
    custom-field-accept([((type . repeat) (header) (data ... ... ...)) ([... ... ... #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>]) ((... custom-face-lookup "yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 7322 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "yellow" "black" "default" as as as) ((and ... ...) custom-face-lookup "p
 ink" "default" "default" t as as)


 ((and ... ...) custom-face-lookup "pink" "default" "default" as t as) ((or ... ...) custom-face-lookup "pink" "default" "default" as as as) ((and ... ...) custom-face-lookup "dark blue" "default" "default" t as as) ((and ... ...) custom-face-lookup "SkyBlue" "default" "default" as t as) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue" "default" "default" as as as) ((and ... ...) custom-face-lookup "white" "default" "default" t as as) ((and ... ...) custom-face-lookup "white" "default" "default" as t as) ((= mark gnus-unread-mark) custom-face-lookup "white" "default" "default" as as as) ((> score default) . bold) ((< score default) . italic)) t)
    custom-group-accept([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Custom
 ize*>]) ((... custom-face-lookup 


"yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "yellow" "black" "default" as as as) ((and ... ...) custom-face-lookup "pink" "default" "default" t as as) ((and ... ...) custom-face-lookup "pink" "default" "default" as t as) ((or ... ...) custom-face-lookup "pink" "default" "default" as as as) ((an
 d ... ...) custom-face-lookup "da


rk blue" "default" "default" t as as) ((and ... ...) custom-face-lookup "SkyBlue" "default" "default" as t as) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue" "default" "default" as as as) ((and ... ...) custom-face-lookup "white" "default" "default" t as as) ((and ... ...) custom-face-lookup "white" "default" "default" as t as) ((= mark gnus-unread-mark) custom-face-lookup "white" "default" "default" as as as) ((> score default) . bold) ((< score default) . italic)) t)
    custom-field-accept([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Custom
 ize*>]) ((... custom-face-lookup 


"yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "yellow" "black" "default" as as as) ((and ... ...) custom-face-lookup "pink" "default" "default" t as as) ((and ... ...) custom-face-lookup "pink" "default" "default" as t as) ((or ... ...) custom-face-lookup "pink" "default" "default" as as as) ((an
 d ... ...) custom-face-lookup "da


rk blue" "default" "default" t as as) ((and ... ...) custom-face-lookup "SkyBlue" "default" "default" as t as) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue" "default" "default" as as as) ((and ... ...) custom-face-lookup "white" "default" "default" t as as) ((and ... ...) custom-face-lookup "white" "default" "default" as t as) ((= mark gnus-unread-mark) custom-face-lookup "white" "default" "default" as as as) ((> score default) . bold) ((< score default) . italic)) t)
    custom-default-reset([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Custo
 mize*>]) ((... custom-face-lookup


 "yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>])
    custom-group-reset([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Customi
 ze*>]) ((... custom-face-lookup "


yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>])
    custom-field-reset([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Customi
 ze*>]) ((... custom-face-lookup "


yellow" "black" "default" as as as) (... custom-face-lookup "pink" "default" "default" t as as) (... custom-face-lookup "pink" "default" "default" as t as) (... custom-face-lookup "pink" "default" "default" as as as) (... custom-face-lookup "dark blue" "default" "default" t as as) (... custom-face-lookup "SkyBlue" "default" "default" as t as) (... custom-face-lookup "SkyBlue" "default" "default" as as as) (... custom-face-lookup "white" "default" "default" t as as) (... custom-face-lookup "white" "default" "default" as t as) (... custom-face-lookup "white" "default" "default" as as as) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>])
    custom-reset-all()
    customize()
    call-interactively(customize)
    execute-extended-command(nil)
    call-interactively(execute-extended-command)

To reproduce:

  $ emacs -q

  M-x gnus RET

  M-x customize RET

Note that if you load customize without loading GNUS, it works.  The
problem seems to be in the "Summary Line Highlighting" section of
gnus-cus.el.

I looked there, and all the previous calls to custom-face-lookup use a
syntax like this:

    (custom-face-lookup "dark blue" nil nil t t 'as-is)

(note 'as-is) but from "Summary Line Highlighting" down, this calling
sequence is used:

    (custom-face-lookup "yellow" "black" nil 'as 'as 'as)

However, I tried changing the 'as to 'as-is, and I still got the above
error except with a slightly different backtrace:

  Signaling: (void-variable is)
    (custom-face-lookup "yellow-black-default-as" "is" "as" is as is)
    eval((custom-face-lookup "yellow-black-default-as" "is" "as" is as is))
    custom-face-hack([((tag . "Customized") (compact . t) (face-tag . custom-face-hack) (eval . custom-face-eval) (data ... "\n" ... ... ... "\n" ... "              " ... "             " ...) (default custom-face-lookup "default" "default" "default" nil nil nil) (type . list)) ([... __uninitialized__ __uninitialized__ #<marker at 7108 in *Customize*> #<marker at 7158 in *Customize*>] nil [... __uninitialized__ __uninitialized__ #<marker at 7163 in *Customize*> #<marker at 7183 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7187 in *Customize*> #<marker at 7207 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7217 in *Customize*> #<marker at 7237 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7245 in *Customize*> #<marker at 7252 in *Customize*>] __uninitialized__ #<marker at 7239 in *Customize*> #<marker at 7253 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7276 in *Cu
 stomize*> #<marker at 7283 in *Cu


stomize*>] __uninitialized__ #<marker at 7268 in *Customize*> #<marker at 7284 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7309 in *Customize*> #<marker at 7316 in *Customize*>] __uninitialized__ #<marker at 7298 in *Customize*> #<marker at 7317 in *Customize*>]) __uninitialized__ #<marker at 7098 in *Customize*> #<marker at 7317 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is))
    custom-group-accept([((tag . "Customized") (compact . t) (face-tag . custom-face-hack) (eval . custom-face-eval) (data ... "\n" ... ... ... "\n" ... "              " ... "             " ...) (default custom-face-lookup "default" "default" "default" nil nil nil) (type . list)) ([... __uninitialized__ __uninitialized__ #<marker at 7108 in *Customize*> #<marker at 7158 in *Customize*>] nil [... __uninitialized__ __uninitialized__ #<marker at 7163 in *Customize*> #<marker at 7183 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7187 in *Customize*> #<marker at 7207 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7217 in *Customize*> #<marker at 7237 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7245 in *Customize*> #<marker at 7252 in *Customize*>] __uninitialized__ #<marker at 7239 in *Customize*> #<marker at 7253 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7276 in 
 *Customize*> #<marker at 7283 in 


*Customize*>] __uninitialized__ #<marker at 7268 in *Customize*> #<marker at 7284 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7309 in *Customize*> #<marker at 7316 in *Customize*>] __uninitialized__ #<marker at 7298 in *Customize*> #<marker at 7317 in *Customize*>]) __uninitialized__ #<marker at 7098 in *Customize*> #<marker at 7317 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is) t)
    custom-field-accept([((tag . "Customized") (compact . t) (face-tag . custom-face-hack) (eval . custom-face-eval) (data ... "\n" ... ... ... "\n" ... "              " ... "             " ...) (default custom-face-lookup "default" "default" "default" nil nil nil) (type . list)) ([... __uninitialized__ __uninitialized__ #<marker at 7108 in *Customize*> #<marker at 7158 in *Customize*>] nil [... __uninitialized__ __uninitialized__ #<marker at 7163 in *Customize*> #<marker at 7183 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7187 in *Customize*> #<marker at 7207 in *Customize*>] [... __uninitialized__ __uninitialized__ #<marker at 7217 in *Customize*> #<marker at 7237 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7245 in *Customize*> #<marker at 7252 in *Customize*>] __uninitialized__ #<marker at 7239 in *Customize*> #<marker at 7253 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7276 in 
 *Customize*> #<marker at 7283 in 


*Customize*>] __uninitialized__ #<marker at 7268 in *Customize*> #<marker at 7284 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7309 in *Customize*> #<marker at 7316 in *Customize*>] __uninitialized__ #<marker at 7298 in *Customize*> #<marker at 7317 in *Customize*>]) __uninitialized__ #<marker at 7098 in *Customize*> #<marker at 7317 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is) t)
    custom-choice-accept([((type . face) (tag . "Face")) [(... ... ... ...) __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is) #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is) t)
    custom-field-accept([((type . face) (tag . "Face")) [(... ... ... ...) __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is) #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] (custom-face-lookup "yellow-black-default-as" "is" "as" is as is) t)
    custom-group-accept([((type . pair) (compact . t) (data ... "\n            " ... "\n")) ([... ... ... #<marker at 7018 in *Customize*> #<marker at 7078 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] ... #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] nil) ((= mark gnus-canceled-mark) (custom-face-lookup "yellow-black-default-as" "is" "as" is as is)) #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>] ((= mark gnus-canceled-mark) (custom-face-lookup "yellow-black-default-as" "is" "as" is as is)) t)
    custom-pair-accept([((type . pair) (compact . t) (data ... "\n            " ... "\n")) ([... ... ... #<marker at 7018 in *Customize*> #<marker at 7078 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] ... #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] nil) ((= mark gnus-canceled-mark) (custom-face-lookup "yellow-black-default-as" "is" "as" is as is)) #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>] ((= mark gnus-canceled-mark) custom-face-lookup "yellow-black-default-as" "is" "as" is as is) t)
    custom-field-accept([((type . pair) (compact . t) (data ... "\n            " ... "\n")) ([... ... ... #<marker at 7018 in *Customize*> #<marker at 7078 in *Customize*>] nil [... [... __uninitialized__ __uninitialized__ #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] ... #<marker at 7318 in *Customize*> #<marker at 7318 in *Customize*>] nil) ((= mark gnus-canceled-mark) (custom-face-lookup "yellow-black-default-as" "is" "as" is as is)) #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>] ((= mark gnus-canceled-mark) custom-face-lookup "yellow-black-default-as" "is" "as" is as is) t)
    custom-repeat-accept([((type . repeat) (header) (data ... ... ...)) ([... ... ... #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>]) ((... custom-face-lookup "yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 7322 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup 
 "yellow-black-default-as" "is" "a


s" is as is) ((and ... ...) custom-face-lookup "pink-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "pink-default-default" "as" "is" t as is) ((or ... ...) custom-face-lookup "pink-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "dark blue-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "as" "is" t as is) ((= mark gnus-unread-mark) custom-face-lookup "white-default-default-as" "is" "as" is as is) ((> score default) . bold) ((< score default) . italic)) t)
    custom-field-accept([((type . repeat) (header) (data ... ... ...)) ([... ... ... #<marker at 7012 in *Customize*> #<marker at 7320 in *Customize*>]) ((... custom-face-lookup "yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 7322 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "
 yellow-black-default-as" "is" "as


" is as is) ((and ... ...) custom-face-lookup "pink-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "pink-default-default" "as" "is" t as is) ((or ... ...) custom-face-lookup "pink-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "dark blue-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "as" "is" t as is) ((= mark gnus-unread-mark) custom-face-lookup "white-default-default-as" "is" "as" is as is) ((> score default) . bold) ((< score default) . italic)) t)
    custom-group-accept([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Custom
 ize*>]) ((... custom-face-lookup 


"yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "yellow-black-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "pink-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "pink-default-default" 
 "as" "is" t as is) ((or ... ...) 


custom-face-lookup "pink-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "dark blue-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "as" "is" t as is) ((= mark gnus-unread-mark) custom-face-lookup "white-default-default-as" "is" "as" is as is) ((> score default) . bold) ((< score default) . italic)) t)
    custom-field-accept([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Custom
 ize*>]) ((... custom-face-lookup 


"yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>] (((= mark gnus-canceled-mark) custom-face-lookup "yellow-black-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "pink-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "pink-default-default" 
 "as" "is" t as is) ((or ... ...) 


custom-face-lookup "pink-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "dark blue-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) ((= mark gnus-ancient-mark) custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "t" "as" is as is) ((and ... ...) custom-face-lookup "white-default-default" "as" "is" t as is) ((= mark gnus-unread-mark) custom-face-lookup "white-default-default-as" "is" "as" is as is) ((> score default) . bold) ((< score default) . italic)) t)
    custom-default-reset([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Custo
 mize*>]) ((... custom-face-lookup


 "yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>])
    custom-group-reset([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Customi
 ze*>]) ((... custom-face-lookup "


yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>])
    custom-field-reset([((tag . "Summary Line Highlighting") (doc . "Controls the highlighting of summary buffer lines. \n\nBelow is a list of `Form'/`Face' pairs.  When deciding how a a\nparticular summary line should be displayed, each form is\nevaluated. The content of the face field after the first true form is\nused.  You can change how those summary lines are displayed, by\nediting the face field.  \n\nIt is also possible to change and add form fields, but currently that\nrequires an understanding of Lisp expressions.  Hopefully this will\nchange in a future release.  For now, you can use the following\nvariables in the Lisp expression:\n\nscore:   The article's score\ndefault: The default article score.\nbelow:   The score below which articles are automatically marked as read. \nmark:    The article's mark.") (name . gnus-summary-highlight) (type . list) (calculate cond ... ... ...) (data ...)) ([... ... ... #<marker at 7322 in *Customize*> #<marker at 7327 in *Customi
 ze*>]) ((... custom-face-lookup "


yellow-black-default-as" "is" "as" is as is) (... custom-face-lookup "pink-default-default" "t" "as" is as is) (... custom-face-lookup "pink-default-default" "as" "is" t as is) (... custom-face-lookup "pink-default-default-as" "is" "as" is as is) (... custom-face-lookup "dark blue-default-default" "t" "as" is as is) (... custom-face-lookup "SkyBlue-default-default" "as" "is" t as is) (... custom-face-lookup "SkyBlue-default-default-as" "is" "as" is as is) (... custom-face-lookup "white-default-default" "t" "as" is as is) (... custom-face-lookup "white-default-default" "as" "is" t as is) (... custom-face-lookup "white-default-default-as" "is" "as" is as is) (... . bold) (... . italic)) #<marker at 6232 in *Customize*> #<marker at 7327 in *Customize*>])
    custom-reset-all()
    customize()
    call-interactively(customize)
    execute-extended-command(nil)
    call-interactively(execute-extended-command)

It looks to me like there's a problem with the quoting of that entry in
the GNUS customizer or something.

-------------------------------------------------------------------------------
 Paul D. Smith <psmith@baynetworks.com>         Network Management Development
 Senior Software Engineer                                   Bay Networks, Inc.
-----------------------------------------------==<http://www.baynetworks.com/>-
 "Please remain calm...I may be mad, but I am a professional." --Mad Scientist
-------------------------------------------------------------------------------
     These are my opinions--Bay Networks takes no responsibility for them.


^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: [19.30.94] customize & GNUS broken
  1996-03-11 18:36 [19.30.94] customize & GNUS broken Paul D. Smith
@ 1996-03-11 19:30 ` Paul D. Smith
  0 siblings, 0 replies; 2+ messages in thread
From: Paul D. Smith @ 1996-03-11 19:30 UTC (permalink / raw)


Yikes!

Sorry for the deluge; the elisp tracebacks didn't look anywhere near
that big when I pasted them into my email buffer :-/.

-------------------------------------------------------------------------------
 Paul D. Smith <psmith@baynetworks.com>         Network Management Development
 Senior Software Engineer                                   Bay Networks, Inc.
-----------------------------------------------==<http://www.baynetworks.com/>-
 "Please remain calm...I may be mad, but I am a professional." --Mad Scientist
-------------------------------------------------------------------------------
     These are my opinions--Bay Networks takes no responsibility for them.


^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~1996-03-11 19:30 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1996-03-11 18:36 [19.30.94] customize & GNUS broken Paul D. Smith
1996-03-11 19:30 ` Paul D. Smith

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).