From mboxrd@z Thu Jan 1 00:00:00 1970 From: Daniel Martins Subject: Re: Re: New Org-mode talk by Carsten Dominik Date: Tue, 16 Mar 2010 14:17:22 -0300 Message-ID: <6ac505ad1003161017x73a5c9ej1e6432cea88b674@mail.gmail.com> References: <927aeeaf1003071051q7a70abb5j3116e87e49331832@mail.gmail.com> <5FB98FBC-3C83-465E-B1C1-2EB348E33626@gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NraOY-0007qM-A6 for emacs-orgmode@gnu.org; Tue, 16 Mar 2010 13:17:30 -0400 Received: from [140.186.70.92] (port=54800 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NraOW-0007p9-GC for emacs-orgmode@gnu.org; Tue, 16 Mar 2010 13:17:29 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1NraOT-0004uB-QC for emacs-orgmode@gnu.org; Tue, 16 Mar 2010 13:17:28 -0400 Received: from mail-fx0-f210.google.com ([209.85.220.210]:57001) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NraOT-0004tw-G5 for emacs-orgmode@gnu.org; Tue, 16 Mar 2010 13:17:25 -0400 Received: by fxm2 with SMTP id 2so174587fxm.26 for ; Tue, 16 Mar 2010 10:17:23 -0700 (PDT) In-Reply-To: <5FB98FBC-3C83-465E-B1C1-2EB348E33626@gmail.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Carsten Dominik Cc: emacs-orgmode@gnu.org 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. 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 : > > 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 hack= ed > - which is why it may not be in the most convenient shape. =A0Feel free t= o > 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 > =A0 =A0 =A0'(("SDMB" . cd-org-someday-kwd-face) > =A0 =A0 =A0 =A0("STARTED" . cd-org-started-kwd-face) > =A0 =A0 =A0 =A0("STRT" . cd-org-started-kwd-face) > =A0 =A0 =A0 =A0("WAITING" . cd-org-waiting-kwd-face) > =A0 =A0 =A0 =A0("WAIT" . cd-org-waiting-kwd-face) > =A0 =A0 =A0 =A0("DELG" . cd-org-delegated-kwd-face) > =A0 =A0 =A0 =A0("PROJ" . cd-org-project-kwd-face) > =A0 =A0 =A0 =A0("DONE" . cd-org-done-kwd-face) > =A0 =A0 =A0 =A0("PRDN" . cd-org-done-kwd-face) > =A0 =A0 =A0 =A0("PRCL" . cd-org-cancelled-kwd-face) > =A0 =A0 =A0 =A0("CNCL" . cd-org-cancelled-kwd-face) > =A0 =A0 =A0 =A0("PRCN" . cd-org-cancelled-kwd-face) > =A0 =A0 =A0 =A0("TODO" . cd-org-todo-kwd-face) > =A0 =A0 =A0 =A0("SELECTED" . cd-org-todo-kwd-face) > =A0 =A0 =A0 =A0("INVITED" . cd-org-waiting-kwd-face) > =A0 =A0 =A0 =A0("SCHEDULED" . cd-org-done-kwd-face) > =A0 =A0 =A0 =A0("DECLINED" . cd-org-cancelled-kwd-face))) > > > Cheers! > > - Carsten > >> >> On Sun, Mar 7, 2010 at 7:39 AM, Carsten Dominik >> wrote: >>> >>> On Mar 7, 2010, at 1:50 PM, Tom wrote: >>> >>>> Stefan Vollmar 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 >>> =A0 in particular came up with the idea to make the TODO keywords look >>> =A0 like buttons. =A0I use that idea, but with different colors. =A0The >>> =A0 exact colors were not my creation, because I am really not talended >>> =A0 in this area. =A0But I agree they look great - they were selected >>> =A0 by the same designer who created the special logo used on all >>> =A0 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 >