8:21 p.m.
This bug report will be sent to the XEmacs Development Team,
not to your local site managers!!
Please write in English, because the XEmacs maintainers do not have
translators to read other languages for them.
In XEmacs 21.2 (beta43) "Terspichore" [Lucid] (i686-pc-linux) of Wed Jan 31
2001 on migraine
configured using `configure --prefix=/home/xris/Tools-test --debug=no
--error-checking=none --site-prefixes=/home/xris/Tools'
Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:
I've found that if I use this two-line init.el file:
(load-options-file "/home/xris/.xemacs/options.el")
(add-hook 'emacs-lisp-mode-hook 'turn-on-font-lock)
[ I've included my options.el file at the end of this report ]
the execution of this dribble file:
#<keypress-event escape>xcus#<keypress-event tab>
lazy-shot
#<keypress-event control-S>48#<keypress-event control-E>#<keypress-event
backspace>8#<keypress-event control-A>#<keypress-event
control-A>#<keypress-event control-N>#<keypress-event
control-F>#<keypress-event control-F>#<keypress-event
control-F>#<keypress-event control-F>#<keypress-event control-F>
1y#<keypress-event control-X>#<keypress-event control-C>
would cause xemacs to take a *very* long time to save the customization
file options.el. This is not a problem with my usual version of xemacs,
beta22. It is not a problem with a much shorter options.el file. It is not
a problem if font-lock mode for emacs-lisp mode is off. Which particular
customization I make does not seem to be an issue.
I regressed the bug on the betas in between and discovered it first started
in beta34. I then regressed font-lock.el itself and found that the extra
number of calls to make-extent in the new definition of
font-lock-after-change-function over the previous version was somehow
causing the problem. Specifically, under the beta34 version, make-extent was
called 7934 times in the 7934 calls made to font-lock-after-change-function
while saving options.el. In the beta33 version, make-extent was called only
2 times in 7934 calls to font-lock-after-change-function. Further, if the
only thing that the beta34 version did was call make-extent, the slowdown
still occurred.
Here is my configure/system info:
XEmacs 21.2-b43 "Terspichore" configured for `i686-pc-linux'.
Compilation / Installation:
Source code location: /tmp/xemacs-21.2.43
Installation prefix: /home/xris/Tools-test
Additional prefixes: /home/xris/Tools
Runtime library search path:
/home/xris/Tools/lib:/usr/local/X11/lib:/usr/local/lib:/usr/openwin/lib:/usr/lib:/lib:/usr/local/contrib/lib
Operating system description file: `s/linux.h'
Machine description file: `m/intel386.h'
Compiler: gcc -g -O3 -Wall -Wno-switch
-Wpointer-arith -Winline -Wmissing-prototypes -Wshadow
Relocating allocator for buffers: no
GNU version of malloc: yes
- Using Doug Lea's new malloc from the GNU C Library.
Window System:
Compiling in support for the X window system:
- X Windows headers location: /usr/X11R6/include
- X Windows libraries location: /usr/X11R6/lib
- Handling WM_COMMAND properly.
Compiling in support for the Athena widget set:
- Athena headers location: X11/Xaw
- Athena library to link: Xaw
Using Lucid menubars.
Using Lucid scrollbars.
Using Athena dialog boxes.
Using Athena native widgets.
TTY:
Compiling in support for ncurses.
Images:
Compiling in support for GIF images (builtin).
Compiling in support for XPM images.
Compiling in support for PNG images.
Compiling in support for JPEG images.
Compiling in support for TIFF images.
Compiling in support for X-Face message headers.
Sound:
Compiling in support for sound (native).
Compiling in support for ESD (Enlightened Sound Daemon).
Databases:
Compiling in support for Berkeley database.
Internationalization:
Mail:
Compiling in support for "dot-locking" mail spool file locking method.
Other Features:
Compiling in support for dynamic shared object modules.
migraine 23> cat /proc/cpuinfo
processor : 0
vendor_id : GenuineIntel
cpu family : 6
model : 8
model name : Pentium III (Coppermine)
stepping : 1
cpu MHz : 651.495424
cache size : 256 KB
fdiv_bug : no
hlt_bug : no
sep_bug : no
f00f_bug : no
coma_bug : no
fpu : yes
fpu_exception : yes
cpuid level : 2
wp : yes
flags : fpu vme de pse tsc msr pae mce cx8 apic sep mtrr pge mca
cmov pat pse36 mmx fxsr xmm
bogomips : 650.44
processor : 1
vendor_id : GenuineIntel
cpu family : 6
model : 8
model name : Pentium III (Coppermine)
stepping : 1
cpu MHz : 651.495424
cache size : 256 KB
fdiv_bug : no
hlt_bug : no
sep_bug : no
f00f_bug : no
coma_bug : no
fpu : yes
fpu_exception : yes
cpuid level : 2
wp : yes
flags : fpu vme de pse tsc msr pae mce cx8 apic sep mtrr pge mca
cmov pat pse36 mmx fxsr xmm
bogomips : 650.44
migraine 24> cat /proc/version
Linux version 2.2.14 (root＠build-09) (gcc version egcs-2.91.66
19990314/Linux (egcs-1.1.2 release)) #1 SMP Wed Jan 26 18:32:50 PST 2000
migraine 25> gcc -v
Reading specs from
/home/xris/Tools/lib/gcc-lib/i686-pc-linux-gnu/2.95.2/specs
gcc version 2.95.2 19991024 (release)
Here is my .xemacs/options.el file:
;;; -*-mode:emacs-lisp-*-
(custom-set-variables
'(filladapt-token-conversion-table (quote ((citation-> . exact)
(supercite-citation . exact) (lisp-comment . exact) (sh-comment . exact)
(postscript-comment . exact) (c++-comment . exact) (c-comment . exact) (texinfo-comment .
exact) (bullet . spaces) (space . exact) (end-of-line . exact))))
'(blink-matching-paren nil)
'(gnats:query-pr-default-options "-r xris -x" t)
'(gnus-default-subscribed-newsgroups (quote ("transmeta.sw"
"transmeta.general" "transmeta.astro" "transmeta.perf"
"transmeta.news.csn" "transmeta.emacs.users")))
'(vm-mail-mode-hook (quote ((lambda nil (require (quote message)) (save-excursion
(save-restriction (message-narrow-to-headers) (delete-matching-lines
"^X-Mailer:")))) (lambda nil (local-set-key " " (quote mail-tab)))
mc-install-write-mode turn-on-font-lock (lambda nil (require (quote highlight-headers)))))
t)
'(bbdb-dial-local-prefix 9)
'(ps-number-of-columns 2)
'(ps-lpr-switches (quote ("-h")))
'(rlogin-directory-tracking-mode t)
'(c-hanging-braces-alist (quote ((block-open after) (block-close . c-snug-do-while)
(brace-list-open) (brace-list-close) (class-open after) (class-close before) (inline-open)
(inline-close after) (substatement-open after) (extern-lang-open after))))
'(cperl-continued-statement-offset 3)
'(lazy-shot-verbose nil)
'(sentence-end-double-space nil)
'(uniquify-after-kill-buffer-p t)
'(compilation-ask-about-save nil)
'(cperl-brace-offset -3)
'(bbdb/mail-auto-create-p nil)
'(strokes-file "~/.xemacs/.strokes")
'(cperl-mode-hook (lambda nil (define-key cperl-mode-map [(control x) (control i)]
(quote cperl-indent-exp)) (define-key cperl-mode-map [(control x) (control d)] (quote
perldb)) (define-key cperl-mode-map [(meta q)] (quote query-replace)) (define-key
cperl-mode-map [(meta Q)] (quote query-replace-regexp)) (define-key cperl-mode-map
[(control c) (control c)] (quote comment-region)) (define-key cperl-mode-map [(control c)
(control u)] (quote uncomment-region))))
'(ispell-silently-savep t)
'(paren-mode (quote paren) nil (paren))
'(ps-build-face-reference nil)
'(display-time-mail-balloon-max-displayed 20)
'(c-initialization-hook (quote ((lambda nil (defconst my-c-style (quote
((c-offsets-alist (access-label . -2) (case-label . 1) (defun-open . -2)
(statement-case-intro . 2)))) "My C/C++ Style") (c-add-style "XRIS"
my-c-style t)))))
'(lazy-shot-stealth-nice 2.0)
'(ps-header-font-size 9)
'(ps-lpr-command "lpr")
'(gnuserv-done-function (lambda (bufname)))
'(gutter-visible-p nil)
'(vc-checkout-carefully t)
'(filladapt-mode t nil (filladapt))
'(efs-short-circuit-to-remote-root nil)
'(gnats:run-in-background nil t)
'(flyspell-mark-duplications-flag nil)
'(lazy-shot-step-size 2048)
'(fill-column 76)
'(modifier-keys-are-sticky nil)
'(gnus-read-active-file (quote some))
'(font-lock-maximum-decoration t)
'(efs-default-user "xris" t)
'(vc-mistrust-permissions t)
'(c-comment-continuation-stars "* ")
'(bbdb-sound-player "/usr/bin/play")
'(url-mail-command (quote vm-mail))
'(ps-right-margin 10.69291338582677)
'(allow-deletion-of-last-visible-frame nil)
'(shell-prompt-face (quote shell-prompt-face))
'(cperl-label-offset -2)
'(comment-column 0)
'(c++-mode-hook (quote ((lambda nil (define-key c++-mode-map [(meta q)] (quote
query-replace)) (define-key c++-mode-map [(meta Q)] (quote query-replace-regexp))
(define-key c++-mode-map [(control x) (control e)] (quote compile)) (define-key
c++-mode-map [(control x) p] (quote c-fill-paragraph)) (define-key c++-mode-map [(control
x) ?\.] (quote next-error)) (define-key c++-mode-map [(control tab)] (quote
c-indent-command)) (define-key c++-mode-map [(control c) l] (quote fume-list-functions))
(define-key c++-mode-map [(control c) g] (quote fume-prompt-function-goto)) (define-key
c++-mode-map [(control x) (control i)] (quote c-indent-exp)) (define-key c++-mode-map
[(control c) (control u)] (quote uncomment-region))))))
'(mouse-avoidance-mode nil nil (avoid))
'(gnats:libdir "/usr/local/lib/gnats" t)
'(scroll-step 1)
'(vc-initial-comment t)
'(delete-key-deletes-forward t)
'(balloon-help-use-sound nil)
'(compilation-error-regexp-systems-list (quote (gnu)))
'(balloon-help-mode t nil (balloon-help))
'(gnus-get-new-news-hook nil)
'(gnus-summary-selected-face (quote gnus-summary-selected-face))
'(auto-save-directory "/home/xris/.xemacs/.autosave")
'(c-insert-tab-function (quote tab-to-tab-stop))
'(c-hanging-comment-starter-p nil)
'(ps-underlined-faces (quote (font-lock-special-keyword-face)) t)
'(widget-mouse-face (quote highlight))
'(vm-mime-attachment-save-directory nil t)
'(ps-print-header-frame nil)
'(ispell-query-replace-choices nil)
'(uniquify-buffer-name-style (quote post-forward))
'(filladapt-mode-line-string "")
'(c-mode-hook (quote ((lambda nil (define-key c-mode-map [(meta q)] (quote
query-replace)) (define-key c-mode-map [(meta Q)] (quote query-replace-regexp))
(define-key global-map [(control meta f)] (quote goto-next-c-function)) (define-key
c-mode-map [(control x) (control e)] (quote compile)) (define-key c-mode-map [(control x)
p] (quote c-fill-paragraph)) (define-key c-mode-map [(control x) ?\.] (quote next-error))
(define-key c-mode-map [(control tab)] (quote c-indent-command)) (define-key c-mode-map
[(control c) l] (quote fume-list-functions)) (define-key c-mode-map [(control c) g] (quote
fume-prompt-function-goto)) (define-key c-mode-map [(control x) (control i)] (quote
c-indent-exp)) (define-key c-mode-map [(control c) (control u)] (quote
uncomment-region))))))
'(gnats:keep-edited-buffers nil t)
'(flyspell-issue-welcome-flag nil)
'(column-number-mode t)
'(lazy-shot-mode t nil (lazy-shot))
'(wwi-auto-install-on-startup-flag t nil (where-was-i-db))
'(cperl-scan-files-regexp "\\.\\([pP][hLlm]\\|xs\\)$")
'(paren-backwards-message t)
'(bbdb-default-area-code 408)
'(backward-delete-function (quote backward-delete-char-untabify))
'(gnus-novice-user nil)
'(send-pr:datadir "/usr/local/lib/" t)
'(bbdb-completion-display-record nil)
'(fume-display-in-modeline-p nil t)
'(bbdb-send-mail-style (quote vm))
'(flyspell-global-modes (quote (c-mode c++-mode mail-mode text-mode)))
'(balloon-help-timeout 1500)
'(shadow-todo-file "/home/xris/.xemacs/.shadow_todo")
'(recent-files-save-file "/home/xris/xemacs/.recent-files.el")
'(c-tab-always-indent nil)
'(bbdb-elided-display (quote (address)))
'(c-backslash-column 76)
'(ispell-personal-dictionary nil)
'(sh-mode-hook nil)
'(w3-hotlist-file "~/.netscape/history.list")
'(gnus-after-getting-new-news-hook nil)
'(follow-mode-off-hook (quote ((lambda nil (setq follow-sync nil)))) t)
'(lazy-shot-minimum-size 1)
'(dabbrev-case-replace t t)
'(vc-suppress-confirm t)
'(compilation-mouse-motion-initiate-parsing nil)
'(pending-delete-modeline-string "")
'(display-time-form-list (quote (date time load mail)))
'(ps-inter-column 10)
'(display-time-display-time-background (quote transparent))
'(vm-auto-displayed-mime-content-types (quote ("text" "multipart"
"message/rfc822" "text/plain")) t)
'(ps-bottom-margin 22.51968503937008)
'(inhibit-startup-message t t)
'(gnus-verbose 10)
'(filladapt-token-match-table (quote ((citation-> citation->)
(supercite-citation supercite-citation) (lisp-comment lisp-comment) (sh-comment
sh-comment) (postscript-comment postscript-comment) (c++-comment c++-comment) (c-comment
c-comment) (texinfo-comment texinfo-comment) (bullet) (space bullet space)
(beginning-of-line beginning-of-line))))
'(term-eol-on-send t)
'(custom-file "~/.xemacs/options.el")
'(balloon-help-font "*-helvetica-bold-r-normal--12-*")
'(ps-italic-faces (quote (font-lock-comment-face man-italic message-cited-text)) t)
'(vm-highlighted-header-face (quote font-lock-function-name-face) t)
'(dabbrev-abbrev-skip-leading-regexp
"[][$%&＠!()-+*/<>:;^?|=\"']")
'(cperl-help nil)
'(lazy-shot-stealth-verbose nil)
'(tab-stop-list (quote (4 8 12 16 20 24 28 32 36 40 44 48 52 56 60 64 68 72 76 80 84
88 92 96 100 104 108 112 116 120)) t)
'(c-hanging-comment-ender-p nil)
'(gnuserv-init-hook nil)
'(ps-always-build-face-reference t)
'(focus-follows-mouse t)
'(c-cleanup-list (quote (defun-close-semi list-close-comma scope-operator)))
'(where-was-i-db "~/.xemacs/.wwi.db")
'(efs-auto-save 1 t)
'(global-flyspell-mode nil nil (flyspell))
'(hs-minor-mode nil nil (hideshow))
'(tags-build-completion-table t)
'(dabbrev-abbrev-char-regexp "\\sw\\|\\s_")
'(gnats:keep-sent-messages nil t)
'(filladapt-token-table (quote (("^" beginning-of-line) (">+"
citation->) ("\\(\\w\\|[0-9]\\)[^'`\"<
]*>[ ]*" supercite-citation) (";+" lisp-comment) ("#+"
sh-comment) ("%+" postscript-comment) ("///*" c++-comment) ("＠c[
]" texinfo-comment) ("＠comment[ ]" texinfo-comment) ("\\\\item[
]" bullet) ("[0-9]+\\.[ ]" bullet) ("[0-9]+\\(\\.[0-9]+\\)+[
]" bullet) ("[A-Za-z]\\.[ ]" bullet) ("(?[0-9]+)[ ]" bullet)
("(?[A-Za-z])[ ]" bullet) ("[0-9]+[A-Za-z]\\.[ ]" bullet)
("(?[0-9]+[A-Za-z])[ ]" bullet) ("[-~+]+[ ]" bullet) ("[*]+[
]" c-comment) ("o[ ]" bullet) ("[ ]+" space) ("$"
end-of-line))))
'(auto-insert-query nil)
'(ps-header-offset 10.34645669291339)
'(efs-default-password nil t)
'(display-time-display-time-foreground (quote modline))
'(fill-individual-varying-indent t)
'(visible-bell nil)
'(c-default-style "user")
'(ps-print-color-p nil)
'(asm-comment-char ?\#)
'(lazy-shot-stealth-time nil)
'(vc-annotate-background "gray15")
'(pending-delete-mode t nil (pending-del))
'(gnus-article-display-hook (quote (gnus-article-hide-boring-headers
gnus-article-remove-trailing-blank-lines gnus-smiley-display
gnus-article-hide-headers-if-wanted gnus-article-hide-boring-headers
gnus-article-treat-overstrike gnus-article-maybe-highlight gnus-article-display-x-face)))
'(efs-short-circuit t)
'(cperl-tab-always-indent nil)
'(tags-always-exact nil)
'(flyspell-mode-line-string "")
'(balloon-help-background "white")
'(bbdb-use-pop-up nil)
'(gnuserv-visit-hook nil)
'(gnus-subscribe-newsgroup-method (quote gnus-subscribe-zombies))
'(vm-highlight-url-face (quote font-lock-function-name-face) t)
'(ps-left-margin 11.6)
'(toolbar-visible-p nil)
'(explicit-shell-file-name "/home/xris/Tools/bin/zsh")
'(cperl-indent-level 3)
'(errors-deactivate-region nil)
'(ps-font-size 9)
'(add-log-time-format (quote current-time-string))
'(vc-static-header-alist (quote (("\\.c$" . "static char rcsid[] =
\"$Id$\";
USE(rcsid);
") ("\\.C$" . "static char rcsid[] = \"$Id$\";
USE(rcsid);
") ("\\.cc$" . "static char rcsid[] = \"$Id$\";
USE(rcsid);
"))))
'(c-electric-pound-behavior (quote (alignleft)))
'(sentence-end "[.?!][]\"')}]*\\($\\| $\\| \\| \\)[
]*" t)
'(scrollbars-visible-p nil)
'(shell-output-face (quote shell-output-face))
'(ps-bold-faces (quote (font-lock-variable-name-face font-lock-emphasized-face
font-lock-keyword-face font-lock-reference-face font-lock-other-emphasized-face
font-lock-preprocessor-face font-lock-warning-face font-lock-special-comment-face
font-lock-special-keyword-face font-lock-function-name-face)) t)
'(gnats:root "/usr/local/lib/gnats/gnats-db" t)
'(line-number-mode t)
'(tags-auto-read-changed-tag-files t)
'(compile-command "path=($theirpath) ~xris/bin/xmake ")
'(c-mode-common-hook (quote (turn-on-font-lock fume-add-menubar-entry (lambda nil
(c-set-style "XRIS")) (lambda nil (define-key c-mode-base-map [(control x)
(control i)] (quote c-indent-exp))) (lambda nil (define-key c-mode-base-map [(control x)
?\t] (quote c-indent-exp))) my-hs-setup (lambda nil (flyspell-mode t)))))
'(parse-sexp-ignore-comments nil)
'(c-basic-offset 4)
'(teach-extended-commands-p nil)
'(ps-auto-font-detect nil)
'(stack-trace-on-error nil)
'(revert-without-query (quote (".")))
'(user-full-name "Chris Holt" t)
'(shadow-info-file "/home/xris/.xemacs/.shadows")
'(shell-mode-hook (quote (turn-on-font-lock)))
'(display-time-load-list (quote (0.5 1.0 1.5 2.0 2.5 3.0)))
'(compilation-search-path (quote (nil "~/work/sp/" "~/work/ad/"
"./$CPU/")))
'(dabbrev-case-fold-search nil t)
'(cperl-comment-column 0)
'(ps-default-bg (quote (1.0 1.0 1.0)))
'(ps-default-fg (quote (0 0 0)))
'(save-completions-file-name "~/.xemacs/.completions")
'(find-file-compare-truenames t)
'(shell-file-name "/home/xris/Tools/bin/zsh")
'(gnus-check-bogus-newsgroups t)
'(auto-save-offer-delete (quote always))
'(ps-landscape-mode t)
'(ps-header-title-font-size 10)
'(paren-blink-interval 0.6)
'(user-mail-address "xris(a)transmeta.com" t)
'(make-tags-files-invisible nil)
'(vm-summary-highlight-face (quote font-lock-function-name-face) t)
'(Manual-mode-hook (quote ((lambda nil (define-key Manual-mode-map [(control f)]
(quote Manual-follow-xref))))))
'(gnus-check-new-newsgroups nil)
'(vm-init-file "~/.xemacs/.vm" t)
'(exec-path (quote ("/home/xris/bin/i386-linux-libc6/"
"/home/xris/bin/" "/home/xris/Tools/bin"
"/home/xris/Tools/bin/X11" "/home/xris/Tools/enlightenment/bin"
"/usr/local/sbin/i386-linux-libc6/" "/usr/local/sbin/"
"/usr/local/contrib/bin/" "/usr/local/bin/i386-linux-libc6/"
"/usr/local/bin/" "/bin/" "/usr/bin/"
"/usr/X11R6/bin/" "/project/sw/ad/i386-linux/bin/"
"/usr/local/lsf/bin/" "/proj/sw/tee/bin/" "/sbin/"
"/usr/sbin/" "/home/xris/bin/"
"/home/xris/Tools/lib/xemacs/xemacs-packages/lib-src/"
"/home/xris/Tools/lib/xemacs-21.2-b22/i686-pc-linux/")))
'(fume-auto-position-popup nil)
'(ps-top-margin 22.51968503937008)
'(gnus-save-killed-list t)
'(bbdb-sound-files (quote ["/home/xris/Tools/share/Sounds/touchtone.0.au"
"/home/xris/Tools/share/Sounds/touchtone.1.au"
"/home/xris/Tools/share/Sounds/touchtone.2.au"
"/home/xris/Tools/share/Sounds/touchtone.3.au"
"/home/xris/Tools/share/Sounds/touchtone.4.au"
"/home/xris/Tools/share/Sounds/touchtone.5.au"
"/home/xris/Tools/share/Sounds/touchtone.6.au"
"/home/xris/Tools/share/Sounds/touchtone.7.au"
"/home/xris/Tools/share/Sounds/touchtone.8.au"
"/home/xris/Tools/share/Sounds/touchtone.9.au"]))
'(bbdb-dial-long-distance-prefix 1)
'(font-lock-mode t nil (font-lock))
'(c-hanging-colons-alist (quote ((member-init-intro) (inher-intro) (case-label after)
(label after) (access-label after))))
'(fume-menubar-menu-location nil))
(custom-set-faces
'(info-xref ((((type tty)) (:bold t :foreground "red")) (((class color)
(type x)) (:bold nil :foreground "#9fdf9f"))))
'(text-cursor ((((type tty)) (:foreground "black" :background
"yellow")) (((type x) (class color)) (:foreground "gray15" :background
"yellow"))) t)
'(pointer ((((type tty)) (:foreground "yellow" :bold nil)) (((type x)
(class color)) (:foreground "yellow"))) t)
'(custom-set-face ((t nil)))
'(font-lock-m4-face ((((class color)) (:foreground "yellow")) (t
(:underline t))))
'(gui-button-face ((((type tty)) (:foreground "blue" :background
"white")) (((class color) (type x)) (:inverse-video t))) t)
'(info-node ((t (:bold t :foreground "yellow"))))
'(secondary-selection ((((type tty)) (:foreground "black" :background
"white")) (((class color) (type x)) (:background "gray52"))) t)
'(widget-field-face ((((class color grayscale) (background light)) (:background
"gray52")) (((class color grayscale) (background dark)) (:background
"gray52")) (t (:italic t))))
'(hyper-apropos-heading ((((type tty)) (:foreground "red" :bold nil))
(((type x) (class color)) (:bold t))))
'(ediff-current-diff-face-B ((((type tty)) (:foreground "black" :background
"white" :bold nil)) (((type x)) (:foreground "firebrick" :background
"pale green")) (nil (:inverse-video t))))
'(ediff-current-diff-face-A ((((type tty)) (:foreground "black" :background
"white" :bold nil)) (((type x)) (:foreground "firebrick" :background
"pale green")) (nil (:inverse-video t))))
'(gnus-header-subject-face ((((class color) (type x)) (:foreground
"pink"))))
'(gnus-header-from-face ((((class color) (type x)) (:foreground
"seagreen1"))))
'(font-lock-string-face ((((type tty)) (:foreground "blue" :bold nil))
(((type x) (class color)) (:bold t))))
'(hyper-apropos-warning ((((type tty)) (:foreground "blue" :bold t))
(((type x) (class color)) (:foreground "red" :bold t))))
'(font-lock-special-keyword-face ((((type x) (class color)) (:foreground
"palevioletred1" :bold nil)) (((type tty)) (:foreground "magenta"
:bold nil))))
'(font-lock-reference-face ((((type tty)) (:foreground "yellow" :bold nil))
(((type x) (class color)) (:foreground "yellow" :bold nil))))
'(flyspell-duplicate-face ((((type tty)) (:foreground "green" :bold nil))
(((type x) (class color)) (:foreground "seagreen1"))))
'(message-headers ((((type tty)) (:bold t :foreground "red")) (((class
color) (type x)) (:bold nil :foreground "sienna1"))))
'(term-yellow-bold-face ((((type tty)) (:foreground "yellow" :bold nil))
(((type x) (class color)) (:foreground "yellow"))) t)
'(shell-prompt-face ((((type tty)) (:foreground "yellow" :bold nil))
(((type x) (class color)) (:foreground "yellow" :bold nil))) t)
'(isearch-secondary ((((type tty)) (:foreground "black" :background
"white" :bold nil)) (((type x) (class color)) (:foreground
"orangered"))) t)
'(custom-changed-face ((((type tty)) (:foreground "green"))))
'(custom-documentation-face ((((type tty)) (:foreground "cyan" :bold nil))
(((type x) (class color)) (:foreground "burlywood1" :bold nil))) t)
'(gnus-summary-selected-face ((t (:bold t))))
'(custom-group-tag-face ((((type tty)) (:foreground "red" :bold t)) (((type
x) (class color)) (:foreground "sienna1"))))
'(man-bold ((((type x) (class color)) (:foreground "yellow" :bold nil))
(((type tty)) (:foreground "yellow" :bold nil))))
'(custom-variable-tag-face ((((type tty)) (:foreground "green" :bold t))
(((type x) (class color)) (:foreground "#9fdf9f" :bold nil))))
'(message-header-subject-face ((((type tty)) (:foreground "magenta" :bold
t)) (((type x) (class color)) (:foreground "pink"))))
'(man-italic ((((type x) (class color)) (:foreground "orange" :bold nil
:italic nil)) (((type tty)) (:foreground "cyan" :bold t))))
'(custom-modified-face ((((class color)) (:foreground "white" :background
"blue")) (t (:bold t))))
'(font-lock-doc-string-face ((((type tty)) (:foreground "blue" :bold nil))
(((type x) (class color)) (:bold t))))
'(custom-group-tag-face-1 ((t nil)))
'(display-time-time-balloon-face ((((type tty)) (:foreground "red" :bold
nil)) (((type x) (class color)) (:foreground "black"))))
'(cperl-here-face ((((type tty)) (:foreground "green")) (((class color)
(type x)) (:foreground "#9fdfdf"))))
'(modeline-buffer-id ((((type tty)) (:foreground "yellow" :background
"black" :bold t)) (((type x) (class color)) (:foreground "yellow"
:background "gray52"))) t)
'(font-lock-preprocessor-face ((((type tty)) (:foreground "red" :bold t))
(((type x) (class color)) (:foreground "sienna1" :bold nil))))
'(modeline-mousable ((((type tty)) (:foreground "cyan" :background
"black" :bold t)) (((type x)) (:foreground "burlywood1" :background
"gray52"))) t)
'(custom-invalid-face ((((class color)) (:foreground "gray15" :background
"red"))))
'(font-lock-variable-name-face ((((type tty)) (:foreground "yellow" :bold
t)) (((type x) (class color)) (:foreground "gold3" :bold nil))))
'(widget-button-pressed-face ((((class color)) (:foreground
"seagreen1"))))
'(fixed ((t (:bold t))))
'(flyspell-incorrect-face ((((type tty)) (:foreground "green" :bold nil))
(((class color)) (:foreground "seagreen1"))))
'(paren-match ((((type tty)) (:foreground "white" :background
"black" :bold t :inverse-video t)) (((type x) (class color)) (:foreground
"black" :background "white"))) t)
'(modeline-mousable-minor-mode ((((type tty)) (:foreground "red"
:background "black" :bold t)) (((type x) (class color)) (:foreground
"orange1" :background "gray52"))) t)
'(custom-face-tag-face ((((type tty)) (:foreground "magenta" :bold t))
(((type x) (class color)) (:foreground "pink" :bold nil))))
'(hyper-apropos-section-heading ((((type tty)) (:foreground "cyan" :bold
t)) (((type x) (class color)) (:bold t :italic t))))
'(hyper-apropos-hyperlink ((((type tty)) (:foreground "green" :bold t))
(((class color) (background light)) (:foreground "#9fdf9f"))))
'(gnus-header-content-face ((((class color) (type x)) (:italic t :foreground
"burlywood1"))))
'(custom-state-face ((((type tty)) (:foreground "cyan" :bold nil)) (((type
x) (class color)) (:foreground "lightblue"))))
'(display-time-mail-balloon-gnus-group-face ((nil (:foreground
"seagreen1"))))
'(font-lock-other-emphasized-face ((((type tty)) (:bold nil :foreground
"blue" :inverse-video t)) (t (:bold t))) t)
'(man-heading ((((type x) (class color)) (:foreground "sienna1" :bold nil))
(((type tty)) (:foreground "red" :bold nil))))
'(font-lock-warning-face ((((type tty)) (:foreground "blue" :bold t))
(((type x) (class color)) (:foreground "#9f9fdf" :bold nil))))
'(font-lock-keyword-face ((((type tty)) (:foreground "red" :bold nil))
(((type x) (class color)) (:foreground "orange" :bold nil))))
'(message-cited-text-face ((((type tty)) (:foreground "cyan" :bold nil))
(((type x) (class color)) (:foreground "burlywood1"))))
'(man-xref ((((type x) (class color)) (:foreground "#9fdf9f" :bold nil
:italic nil)) (((type tty)) (:foreground "green" :bold t :italic nil))))
'(custom-saved-face ((t (:bold t))))
'(yellow ((((type tty)) (:foreground "yellow")) (((type x) (class color))
(:foreground "yellow"))) t)
'(font-lock-constant-face ((((type x) (class color)) (:foreground "#9fdf9f"
:bold nil)) (((type tty)) (:foreground "blue" :bold nil))))
'(font-lock-type-face ((((type tty)) (:foreground "cyan" :bold t)) (((type
x) (class color)) (:foreground "lemonchiffon" :bold nil))))
'(message-cited-text ((((type tty)) (:foreground "cyan" :bold nil)) (((type
x) (class color)) (:foreground "burlywood1" :bold nil))))
'(bold ((nil (:bold t))) t)
'(bold-italic ((((type tty)) (:foreground "yellow" :bold nil)) (((type x)
(class color)) (:foreground "yellow" :bold t :italic t :underline nil))) t)
'(term-yellow-face ((((type tty)) (:foreground "yellow" :bold nil)) (((type
x) (class color)) (:foreground "yellow" :bold nil))) t)
'(gnus-header-name-face ((((class color) (type x)) (:foreground "tan"))))
'(font-lock-emphasized-face ((((type tty)) (:bold nil :foreground "red"
:inverse-video t)) (t (:foreground "black" :background
"lightyellow2"))) t)
'(shell-output-face ((((type tty)) (:bold t)) (((class color) (type x)) (:bold nil
:foreground "#9fdf9f"))) t)
'(widget-inactive-face ((((class grayscale color) (type x)) (:foreground
"gray80"))))
'(primary-selection ((((type tty)) (:background "black" :bold t)) (((type
x) (class color)) (:background "gray52"))) t)
'(message-header-cc-face ((((type tty)) (:foreground "green" :bold nil))
(((type x) (class color)) (:foreground "#9fdf9f"))))
'(message-header-other-face ((((class color) (type x)) nil)))
'(cperl-pod-head-face ((((type tty)) (:foreground "white")) (((class color)
(type x)) (:foreground "tan"))))
'(message-header-newsgroups-face ((((type tty)) (:foreground "yellow" :bold
nil)) (((type x) (class color)) (:foreground "yellow"))))
'(custom-button-face ((((type tty)) (:foreground "yellow" :bold nil))
(((type x) (class color)) (:foreground "yellow" :bold t))))
'(message-separator-face ((((class color) (type x)) (:foreground
"gray80"))))
'(font-lock-special-comment-face ((((type x) (class color)) (:foreground
"#9fdf9f" :bold t)) (((type tty)) (:foreground "green" :bold t))))
'(list-mode-item-selected ((((type tty)) (:foreground "black" :background
"white")) (((class color) (type x)) (:inverse-video t))) t)
'(custom-variable-button-face ((((type tty)) (:foreground "green" :bold
nil)) (((type x) (class color)) (:foreground "seagreen1" :bold nil))))
'(message-header-contents ((((type tty)) (:foreground "cyan" :bold t))
(((type x) (class color)) (:foreground "lemonchiffon1" :bold nil))))
'(cperl-pod-face ((((type tty)) (:foreground "green")) (((class color)
(type x)) (:foreground "#9fdfdf"))))
'(hyper-apropos-documentation ((((type tty)) (:foreground "cyan")) (((class
color) (background light)) (:foreground "burlywood1"))))
'(italic ((((class color)) (:italic t)) (((type tty)) (:underline nil))) t)
'(font-lock-other-type-face ((((type tty)) (:foreground "blue" :bold nil))
(((type x) (class color)) (:foreground "lightblue"))) t)
'(font-lock-comment-face ((((type tty)) (:foreground "cyan" :bold nil))
(((type x) (class color)) (:foreground "burlywood1" :bold nil))))
'(message-header-name-face ((((type tty)) (:foreground "cyan" :bold nil))
(((type x) (class color)) (:foreground "tan"))))
'(font-lock-function-name-face ((((type tty)) (:foreground "yellow" :bold
nil)) (((type x) (class color)) (:foreground "yellow" :bold t))))
'(message-header-xheader-face ((((class color) (type x)) (:foreground
"steelblue1"))))
'(hyper-apropos-major-heading ((((type tty)) (:foreground "yellow" :bold
nil)) (((type x) (class color)) (:bold t))))
'(widget-button-face ((((type tty)) (:foreground "red" :bold nil)) (((type
x) (class color)) (:bold t))))
'(isearch ((((type tty)) (:foreground "black" :background
"yellow" :bold nil)) (((type x) (class color)) (:foreground
"orangered" :background "gray80" :bold t))) t)
'(custom-rogue-face ((((class color)) (:foreground "pink" :background
"gray50"))))
'(highlight ((((type tty)) (:foreground "black" :background
"white")) (((type x) (class color)) (:background "gray52"))) t)
'(modeline ((((type tty)) (:foreground "white" :background
"black" :bold t)) (((type x) (class color)) (:foreground "white"
:background "gray52"))) t)
'(ediff-current-diff-face-Ancestor ((((type tty)) (:foreground "black"
:background "white" :bold nil)) (((type x)) (:foreground "firebrick"
:background "pale green")) (nil (:inverse-video t))))
'(message-header-to-face ((((type tty)) (:foreground "green" :bold nil))
(((type x) (class color)) (:foreground "seagreen1"))))
'(term-yellow-inv-face ((t (:foreground "black" :background
"yellow"))) t)
'(zmacs-region ((((type tty)) (:foreground "white" :background
"black" :bold t :inverse-video t)) (((type x) (class color)) (:background
"gray52"))) t)
'(message-highlighted-header-contents ((((type tty)) (:foreground "yellow"
:bold nil)) (((type x) (class color)) (:foreground "yellow" :bold nil)))))
;;; Local Variables: ***
;;; after-save-hook:(lambda () (byte-compile-file (buffer-file-name))) ***
;;; End: ***
Chris