Well, It works for white backgrounds but this color scheme is far from optimum.
As I use both white background and black background for the night (I have read some academic papers that said white background is better for the eye fatigue but I am not quite sure of it) I need a white background setup Anyone out there has a proposal of color schemes for white (or at least not dark) backgrounds which could share with us? Daniel 2010/3/18 Carsten Dominik <carsten.domi...@gmail.com> > > On Mar 16, 2010, at 6:17 PM, Daniel Martins wrote: > > I found a "minor" bug in cd-colors.el >> >> >> I use a variation of background/foreground according to day/night >> environments as suggested in >> >> http://www.jurta.org/en/emacs/dotemacs >> >> and which I reproduce below >> >> But using cd-colors and the day option which means >> >> (set-background-color "white") >> (set-foreground-color "black") >> >> I notice that the face org-hide remains black. >> > > I think that many of these faces will not work properly with a white > background - they are all only for a dark background. I would have thought > that the entire scheme is unusable with white. > > - Carsten > > > >> As I use >> >> >> >> (setq org-hide-leading-stars t) >> >> >> this is not quite convenient. >> >> So I commented the line of org-hide in cd-colors and everything worked >> fine! >> >> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; >> `(org-tag ((t (:foreground ,tag)))) >> ;; `(org-hide ((t (:foreground "#191919")))) >> `(org-todo ((t (:background ,todo-bg :foreground "white" ,@box)))) >> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; >> >> Daniel >> >> PS here is the text of my .emacs that I commented above >> >> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; >> >> >> >> ;;; colors >> >> (defun my-colors-light (&optional frame) >> "Set colors suitable for working in light environments, >> i.e. in daylight or under bright electric lamps." >> (interactive) >> (setq frame-background-mode 'light) >> (if frame >> (select-frame frame) >> (setq frame (selected-frame))) >> ;; The color with minimal eye fatigue in light environments >> ;; is "AntiqueWhite3" (RGB: 205 192 176), >> ;; (set-background-color "AntiqueWhite3") >> (set-background-color "white") >> (set-foreground-color "black") >> (when (facep 'region) >> (set-face-background 'region "DarkGrey" frame)) >> (when (facep 'fringe) >> (set-face-background 'fringe (face-background 'default) frame) >> (set-face-foreground 'fringe (face-foreground 'default) frame)) >> ;; When started Emacs under root, warn by red color in the modeline >> (when (and (facep 'mode-line) >> (file-exists-p "/root") >> (file-writable-p "/root")) >> (set-face-background 'mode-line "firebrick"))) >> >> (define-key global-map [f6 ?c ?d] 'my-colors-light) ;; c color d day >> >> (defun my-colors-dark (&optional frame) >> "Set colors suitable for working in the darkness without electricity." >> (interactive) >> (setq frame-background-mode 'dark) >> (if frame >> (select-frame frame) >> (setq frame (selected-frame))) >> (set-background-color "black") >> (set-foreground-color "DarkGrey") >> (when (facep 'region) >> (set-face-background 'region "DimGray" frame)) >> (when (facep 'fringe) >> (set-face-background 'fringe (face-background 'default) frame) >> (set-face-foreground 'fringe (face-foreground 'default) frame))) >> >> (define-key global-map [f6 ?c ?n] 'my-colors-dark) ;; c color n night >> >> ;; Automatically switch to dark background after sunset >> ;; and to light background after sunrise. >> ;; (Note that `calendar-latitude' and `calendar-longitude' >> ;; should be set before calling the `solar-sunrise-sunset') >> (defun my-colors-set (&optional frame) >> (interactive) >> (require 'solar) >> (if (and calendar-latitude calendar-longitude calendar-time-zone) >> (let* ((l (solar-sunrise-sunset (calendar-current-date))) >> (sunrise-string (apply 'solar-time-string (car l))) >> (sunset-string (apply 'solar-time-string (car (cdr l)))) >> (current-time-string (format-time-string "%H:%M"))) >> (if (or (string-lessp current-time-string sunrise-string) >> (string-lessp sunset-string current-time-string)) >> (my-colors-dark frame) >> (my-colors-light frame)) >> (if (and (boundp 'my-sunset-timer) (timerp my-sunset-timer)) >> (cancel-timer my-sunset-timer)) >> (if (and (boundp 'my-sunrise-timer) (timerp my-sunrise-timer)) >> (cancel-timer my-sunrise-timer)) >> (setq my-sunset-timer (run-at-time sunset-string (* 60 60 24) >> 'my-colors-dark)) >> (setq my-sunrise-timer (run-at-time sunrise-string (* 60 60 24) >> 'my-colors-light))))) >> >> >> (my-colors-set) >> (add-to-list 'after-make-frame-functions 'my-colors-set) >> >> >> >> >> >> >> 2010/3/9 Carsten Dominik <carsten.domi...@gmail.com>: >> >>> >>> On Mar 7, 2010, at 7:51 PM, Manuel Amador wrote: >>> >>> Carsten, >>>> >>>> Can we get a copy of the color configuration you are using? >>>> >>>> -- Manuel >>> >>> Yes, I have put my color config here: >>> >>> http://orgmode.org/cd-colors.el >>> >>> This started as a copy of Peter Jones config and was then edited and >>> hacked >>> - which is why it may not be in the most convenient shape. Feel free to >>> package it up nicely and send me a better version. >>> >>> You also need something like this, adapted to your todo keywords. >>> >>> (setq org-todo-keyword-faces >>> '(("SDMB" . cd-org-someday-kwd-face) >>> ("STARTED" . cd-org-started-kwd-face) >>> ("STRT" . cd-org-started-kwd-face) >>> ("WAITING" . cd-org-waiting-kwd-face) >>> ("WAIT" . cd-org-waiting-kwd-face) >>> ("DELG" . cd-org-delegated-kwd-face) >>> ("PROJ" . cd-org-project-kwd-face) >>> ("DONE" . cd-org-done-kwd-face) >>> ("PRDN" . cd-org-done-kwd-face) >>> ("PRCL" . cd-org-cancelled-kwd-face) >>> ("CNCL" . cd-org-cancelled-kwd-face) >>> ("PRCN" . cd-org-cancelled-kwd-face) >>> ("TODO" . cd-org-todo-kwd-face) >>> ("SELECTED" . cd-org-todo-kwd-face) >>> ("INVITED" . cd-org-waiting-kwd-face) >>> ("SCHEDULED" . cd-org-done-kwd-face) >>> ("DECLINED" . cd-org-cancelled-kwd-face))) >>> >>> >>> Cheers! >>> >>> - Carsten >>> >>> >>>> On Sun, Mar 7, 2010 at 7:39 AM, Carsten Dominik >>>> <carsten.domi...@gmail.com> wrote: >>>> >>>>> >>>>> On Mar 7, 2010, at 1:50 PM, Tom wrote: >>>>> >>>>> Stefan Vollmar <vollmar <at> nf.mpg.de> writes: >>>>>> >>>>>> >>>>>>> Hallo, >>>>>>> >>>>>>> we proudly present: >>>>>>> >>>>>>> "Emacs Org-mode: Organizing a Scientist's Life and Work" >>>>>>> >>>>>>> >>>>>> I noticed the org color config in the talk was much >>>>>> catchier (e.g. the keywords with bgcolor) than in the default org >>>>>> config. It would be a good idea to make org more appealing by >>>>>> coming up with a sexier color scheme. The appearance of org on >>>>>> the main page of orgmode.org is very spartan and can be a turn >>>>>> off for newbies who are used to applications with a more >>>>>> elaborate visual design. >>>>>> >>>>>> I think a better choice of default colors could improve the first >>>>>> impression a bit. Maybe people could send to the list screenshots >>>>>> of their config and one of the better ones could be used as a new >>>>>> default. >>>>>> >>>>> >>>>> The problem I see here is that if a new user downloads Emacs, >>>>> it will have white background and only default colors. >>>>> >>>>> I could of course make the screenshot on orgmode.org with my >>>>> color scheme[1], but then new users would not like the first >>>>> impression they get when they download emacs and install Org. >>>>> >>>>> I am interested in a discussion about how to handle this issue. >>>>> >>>>> - Carsten >>>>> >>>>> [1] The color scheme is based on the scheme by Peter Jones, who >>>>> in particular came up with the idea to make the TODO keywords look >>>>> like buttons. I use that idea, but with different colors. The >>>>> exact colors were not my creation, because I am really not talended >>>>> in this area. But I agree they look great - they were selected >>>>> by the same designer who created the special logo used on all >>>>> our spreadshirt shop items... >>>>> >>>>> >>>>> >>>>> _______________________________________________ >>>>> Emacs-orgmode mailing list >>>>> Please use `Reply All' to send replies to the list. >>>>> Emacs-orgmode@gnu.org >>>>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode >>>>> >>>>> >>>> >>>> >>>> -- >>>> Manuel >>>> >>> >>> - Carsten >>> >>> >>> >>> >>> >>> _______________________________________________ >>> Emacs-orgmode mailing list >>> Please use `Reply All' to send replies to the list. >>> Emacs-orgmode@gnu.org >>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode >>> >>> > - Carsten > > > >
_______________________________________________ Emacs-orgmode mailing list Please use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
