From: Daniel Martins <danielemc@gmail.com>
To: Carsten Dominik <carsten.dominik@gmail.com>
Cc: emacs-orgmode@gnu.org
Subject: Re: Re: New Org-mode talk by Carsten Dominik
Date: Tue, 16 Mar 2010 14:17:22 -0300 [thread overview]
Message-ID: <6ac505ad1003161017x73a5c9ej1e6432cea88b674@mail.gmail.com> (raw)
In-Reply-To: <5FB98FBC-3C83-465E-B1C1-2EB348E33626@gmail.com>
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 <carsten.dominik@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.dominik@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
>
next prev parent reply other threads:[~2010-03-16 17:17 UTC|newest]
Thread overview: 19+ messages / expand[flat|nested] mbox.gz Atom feed top
2010-03-05 20:07 New Org-mode talk by Carsten Dominik Stefan Vollmar
2010-03-05 22:04 ` Russell Adams
2010-03-06 3:27 ` Thomas S. Dye
2010-03-06 15:08 ` Carsten Dominik
2010-03-06 23:43 ` Daniel Martins
[not found] ` <211769421003072137s3a1f48fcq9277529a42b06133@mail.gmail.com>
2010-03-08 5:37 ` Nathan Neff
2010-03-07 12:50 ` Tom
2010-03-07 13:26 ` Benjamin Andresen
2010-03-07 15:39 ` Carsten Dominik
2010-03-07 17:03 ` Tom
2010-03-09 16:16 ` Carsten Dominik
2010-03-07 18:51 ` Manuel Amador
2010-03-09 11:43 ` Carsten Dominik
2010-03-16 17:17 ` Daniel Martins [this message]
2010-03-18 6:02 ` Carsten Dominik
2010-03-29 14:13 ` Daniel Martins
2010-03-07 19:14 ` Łukasz Stelmach
2010-03-08 8:06 ` Carsten Dominik
2010-03-08 11:22 ` Ian Barton
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=6ac505ad1003161017x73a5c9ej1e6432cea88b674@mail.gmail.com \
--to=danielemc@gmail.com \
--cc=carsten.dominik@gmail.com \
--cc=emacs-orgmode@gnu.org \
/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.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.