emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] agenda view of state changes


From: Samuel Wales
Subject: Re: [O] agenda view of state changes
Date: Fri, 17 Apr 2015 14:54:48 -0700

i do not recommend this:

;; (eval-after-load 'org-agenda
;;   '(pushnew 'state org-agenda-log-mode-items :test 'eq))
;; (setq org-agenda-log-mode-items '(closed clock))

===

i do this:

  (setq org-agenda-include-inactive-timestamps t)

and this [i am not signed with fsf]:

    === alpha make agenda display inactive timestamp lines with a new face

        Modified lisp/org-agenda.el
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index a0f47ab..9fe49b8 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5619,6 +5619,9 @@ This function is invoked if
`org-agenda-todo-ignore-deadlines',
                         'org-category-position category-pos
                         'todo-state todo-state
                         'warntime warntime
+                         'face (if inactivep
+                                'org-agenda-inactive
+                              'org-agenda-calendar-event)
                         'type "timestamp")
          (push txt ee))
        (if org-agenda-skip-additional-timestamps-same-entry
        Modified lisp/org-faces.el
diff --git a/lisp/org-faces.el b/lisp/org-faces.el
index f8625f1..47ccc96 100644
--- a/lisp/org-faces.el
+++ b/lisp/org-faces.el
@@ -346,6 +346,16 @@ is of course immediately visible, but for example
a passed deadline is
 of the frame, for example."
   :group 'org-faces)

+(defface org-agenda-inactive ;; originally copied from font-lock-type-face
+  (org-compatible-face nil
+    '((((class color) (min-colors 16) (background light))
(:foreground "ForestGreen"))
+      (((class color) (min-colors 16) (background dark)) (:foreground
"#546b00"))
+      (((class color) (min-colors 8)) (:foreground "green"))
+      (t (:bold nil))))
+  "Face used in agenda to indicate lines that appear because
+inactive timestamps appear in the entries."
+  :group 'org-faces)
+
 (defface org-headline-done ;; originally copied from font-lock-string-face
   (org-compatible-face nil
     '((((class color) (min-colors 16) (background light))
(:foreground "RosyBrown"))

-- 
The Kafka Pandemic: http://thekafkapandemic.blogspot.com

Ramsay's disease DOES progress.  MANY people have died from it.  And
ANYBODY can get it.

Denmark: free Karina Hansen NOW.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]