Re: [Orgmode] Re: New Org-mode talk by Carsten Dominik

[Daniel Martins]

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 <address@hidden>

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 <address@hidden>:

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
<address@hidden> 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.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

--
Manuel

- Carsten





_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

- Carsten