It works perfectly in Fedora core 5. Did you grab color-theme from CVS? On Sun, 20 Aug 2006 17:01:56 GMT, Sébastien Vauban wrote:
> Hello, > > I'm a long time user (and a big fan) of ColorTheme, but have now > problems within Emacs 22 (both in Ubuntu and in the Windows > port): many buffers are not colored anymore (Gnus groups for > example), or not the first time the buffer is visited (Org list > of tasks for example). > > Note -- I don't have any color trouble with the message > buffer, for example. Very very weird. > > Going back and forth from/to Emacs 21/22 with the same .emacs > configuration file, I can see the differences: my color theme is > no more applied... > > ,----[ color-theme-seb.el ] > | > | (require 'color-theme) > | > | (defun color-theme-seb () > | "Initialize faces according to my preferences." > | (interactive) > | (color-theme-install > | '(color-theme-seb > | ((background-color . "white") > | (background-mode . light) > | (border-color . "black") > | (cursor-color . "rgb:15/FF/00") > | (foreground-color . "black") > | (mouse-color . "black")) > | > | (default ((t (nil)))) > | (bold ((t (:bold t :weight bold)))) > | (bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) > | (italic ((t (:italic t :slant italic)))) > | (underline ((t (:underline t)))) > | (highlight ((t (:foreground "white" :background "rgb:31/6A/C5")))) > ;; darkolivegreen > | > | ;; Gnus group buffer > | (gnus-group-mail-1-empty-face ((t (:foreground "rgb:50/50/B0")))) > | (gnus-group-mail-1-face ((t (:foreground "rgb:50/50/B0" :bold t)))) > | (gnus-group-mail-2-empty-face ((t (:foreground "rgb:66/00/66")))) > | (gnus-group-mail-2-face ((t (:foreground "rgb:66/00/66" :bold t)))) > | (gnus-group-mail-3-empty-face ((t (:foreground "rgb:00/77/77")))) > | (gnus-group-mail-3-face ((t (:foreground "rgb:00/77/77" :bold t)))) > | > | (gnus-group-news-1-empty-face ((t (:foreground "rgb:50/50/B0")))) > | (gnus-group-news-1-face ((t (:foreground "rgb:50/50/B0" :bold t)))) > | (gnus-group-news-2-empty-face ((t (:foreground "rgb:66/00/66")))) > | (gnus-group-news-2-face ((t (:foreground "rgb:66/00/66" :bold t)))) > | (gnus-group-news-3-empty-face ((t (:foreground "rgb:00/77/77")))) > | (gnus-group-news-3-face ((t (:foreground "rgb:00/77/77" :bold t)))) > | (gnus-group-news-4-empty-face ((t (:foreground "rgb:99/00/00")))) > | (gnus-group-news-4-face ((t (:foreground "rgb:99/00/00" :bold t)))) > | (gnus-group-news-5-empty-face ((t (:foreground "rgb:00/00/99")))) > | (gnus-group-news-5-face ((t (:foreground "rgb:00/00/99" :bold t)))) > | (gnus-group-news-6-empty-face ((t (:foreground "rgb:BB/66/00")))) > | (gnus-group-news-6-face ((t (:foreground "rgb:BB/66/00" :bold t)))) > | > | ;; Gnus summary buffer > | (gnus-summary-selected-face ((t (:foreground "rgb:FF/66/33" :bold > t)))) > | (gnus-summary-high-unread-face ((t (:foreground "blue" :bold t)))) > | (gnus-summary-high-read-face ((t (:foreground "rgb:80/00/80" :bold > t)))) > | (gnus-summary-high-ticked-face ((t (:foreground "hot pink" :bold > t)))) > | (gnus-summary-high-ancient-face ((t (:foreground "rgb:77/77/99" > :bold t)))) > | (gnus-summary-normal-unread-face ((t (:foreground "blue")))) > | (gnus-summary-normal-read-face ((t (:foreground "rgb:80/00/80")))) > | (gnus-summary-normal-ticked-face ((t (:foreground "hot pink")))) > | (gnus-summary-normal-ancient-face ((t (:foreground > "rgb:77/77/99")))) > | (gnus-summary-low-unread-face ((t (:low t :foreground "blue" > :italic t)))) > | (gnus-summary-low-read-face ((t (:low t :foreground "rgb:80/00/80" > | :italic t)))) > | (gnus-summary-low-ticked-face ((t (:low t :foreground "hot pink" > | :italic t)))) > | (gnus-summary-low-ancient-face ((t (:low t :foreground > "rgb:77/77/99" > | :italic t)))) > | (gnus-summary-cancelled-face ((t (:italic t :foreground "gray55" > | :strike-through t)))) > | > | ;; Gnus article buffer > | (gnus-header-name-face ((t (:foreground "rgb:33/99/CC" :bold t > | :family "Arial")))) > | (gnus-header-from-face ((t (:foreground "blue" :family "Arial")))) > | (gnus-header-subject-face ((t (:foreground "rgb:FF/66/33" :bold > t)))) > | (gnus-header-newsgroups-face ((t (:foreground "rgb:33/99/CC" > | :family "Arial")))) > | (gnus-header-content-face ((t (:foreground "rgb:33/99/CC" > | :family "Arial")))) > | (gnus-cite-attribution-face ((t (:foreground "rgb:50/50/B0")))) > | (gnus-cite-face-1 ((t (:foreground "rgb:50/50/B0")))) > | (gnus-cite-face-2 ((t (:foreground "rgb:66/00/66")))) > | (gnus-cite-face-3 ((t (:foreground "rgb:00/77/77")))) > | (gnus-cite-face-4 ((t (:foreground "rgb:99/00/00")))) > | (gnus-cite-face-5 ((t (:foreground "rgb:00/00/99")))) > | (gnus-cite-face-6 ((t (:foreground "rgb:BB/66/00")))) > | (gnus-cite-face-7 ((t (:foreground "rgb:50/50/B0")))) > | (gnus-cite-face-8 ((t (:foreground "rgb:66/00/66")))) > | (gnus-cite-face-9 ((t (:foreground "rgb:00/77/77")))) > | (gnus-cite-face-10 ((t (:foreground "rgb:99/00/00")))) > | (gnus-signature-face ((t (:foreground "rgb:7F/7F/7F")))) > | (gnus-emphasis-bold ((t (:bold t)))) > | > | (widget-button-face ((t (:bold t :weight bold)))) > | (widget-button-pressed-face ((t (:foreground "red")))) > | (widget-documentation-face ((t (:foreground "dark green")))) > | (widget-field-face ((t (:background "gray85")))) > | (widget-inactive-face ((t (:foreground "dim gray")))) > | (widget-single-line-field-face ((t (:background "gray85")))) > | > | ;; when replying > | (message-header-name-face ((t (:foreground "rgb:33/99/CC" :bold t > | :family "Arial")))) > | (message-header-to-face ((t (:foreground "blue" :family "Arial")))) > | (message-header-cc-face ((t (:foreground "blue" :family "Arial")))) > | (message-header-subject-face ((t (:foreground "rgb:FF/66/33" :bold > t)))) > | (message-header-newsgroups-face ((t (:foreground "rgb:33/99/CC" > | :family "Arial")))) > | (message-header-xheader-face ((t (:foreground "red")))) > | (message-header-other-face ((t (:foreground "rgb:33/99/CC" > | :family "Arial")))) > | (message-separator-face ((t (:foreground "red" :bold t :family > "Arial")))) > | (message-cited-text-face ((t (:foreground "rgb:50/50/B0")))) > | (message-mml-face ((t (:foreground "ForestGreen")))) > | > | ;; Gnus/Message > | (gnus-emphasis-highlight-words ((t (:background "black" > | :foreground "yellow")))) > | (gnus-picon-face ((t (:background "white" :foreground "yellow")))) > | (gnus-picon-xbm-face ((t (:background "white" :foreground > "yellow")))) > | (gnus-x-face ((t (:background "white" :foreground "black")))) > | > | ;; org > | (org-done ((t (:foreground "gray55" :strike-through t)))) > | (org-level-1 ((t (:foreground "blue" :bold t :height 1.4)))) > | (org-level-2 ((t (:foreground "red" :bold t :height 1.2)))) > | (org-level-3 ((t (:foreground "Purple")))) > | (org-scheduled-previously ((t (:foreground "blue" :bold t)))) > | (org-scheduled-today ((t (:foreground "blue")))) > | (org-upcoming-deadline ((t (:foreground "DarkOrange" :bold t)))) > | > | ))) > | > | (provide 'color-theme-seb) > `---- > > I don't know if it's of importance, but here are the fonts I'm > using (one under Ubuntu, the other under Windows, in 9 points): > > ,----[ Extract of my .emacs ] > | > | ;;; ----[ Faces > | > | ;; set default color theme > | (when (try-require 'color-theme) > | (color-theme-initialize) > | (when (try-require 'color-theme-seb) > | (color-theme-seb))) > | > | ;; allow any scalable font > | (when running-ms-windows > | (setq scalable-fonts-allowed t)) > | > | ;; set default font family and font size > | (assq-delete-all 'font default-frame-alist) > | (defvar my-default-font > | (if running-ms-windows > | "-*-Courier New-*-*-*-*-12-90-*-*-*-*-*-*" > | "-Misc-Fixed-Medium-R-SemiCondensed-*-13-*-*-*-*-*-*-*")) > | ;; this latest face supports bold (in Gnus) while > | ;; "-misc-*-*-*-*-*-12-90-*-*-*-*-*-*" does not!! > | > | (add-to-list 'default-frame-alist (cons 'font my-default-font)) > `---- > > Can you help? > > Thanks a lot, > Seb -- Leon _______________________________________________ info-gnus-english mailing list [email protected] http://lists.gnu.org/mailman/listinfo/info-gnus-english
