From: Hadron Quark <hadronquark@gmail.com>
Subject: Re: ColorTheme badly functioning in Emacs 22
Date: Sun, 20 Aug 2006 23:19:33 +0200 [thread overview]
Message-ID: <87k653ds0q.fsf@mail.com> (raw)
In-Reply-To: <mailman.5366.1156105976.9609.info-gnus-english@gnu.org>
Leon <sdl.web@gmail.com> writes:
> It works perfectly in Fedora core 5. Did you grab color-theme from CVS?
>
CVS version is fine in Dapper 606 too using the debian snapshot.
http://www.emacswiki.org/cgi-bin/wiki?ColorTheme#ColorTheme3
> 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
>
>
>
--
next prev parent reply other threads:[~2006-08-20 21:19 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-08-20 17:01 Sébastien Vauban
2006-08-20 20:32 ` Leon
[not found] ` <mailman.5366.1156105976.9609.info-gnus-english@gnu.org>
2006-08-20 21:19 ` Hadron Quark [this message]
2006-08-21 19:37 ` Sébastien Vauban
2006-09-11 7:20 ` kousik
2006-09-11 8:47 ` Oliver Heins
2006-09-11 21:10 Sébastien Vauban
2006-09-12 13:47 ` Oliver Heins
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87k653ds0q.fsf@mail.com \
--to=hadronquark@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).