diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-13 10:43:37 +0100 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-13 10:43:37 +0100 |
commit | fbe3eb4d2afd795807da636a9fd53449b5ef117a (patch) | |
tree | b17a5d1cef08a251d5219b5cdc3a8b858bc72ae0 | |
parent | 3542f0eed95ee8de59729d0fa5de16d4bbdfadf2 (diff) | |
download | org-mode-fbe3eb4d2afd795807da636a9fd53449b5ef117a.tar.gz |
Fix display of current time to show up only today
* lisp/org-agenda.el (org-agenda-add-time-grid-maybe): Show time only
when grid is being made for today.
Patch by Matt Lundin
-rw-r--r-- | lisp/org-agenda.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 6800769..d8e7590 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -5353,7 +5353,7 @@ The modified list may contain inherited tags, and tags matched by new) (put-text-property 2 (length (car new)) 'face 'org-time-grid (car new)))) - (when org-agenda-show-current-time-in-grid + (when (and todayp org-agenda-show-current-time-in-grid) (push (org-format-agenda-item nil org-agenda-current-time-string |