diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2011-03-01 07:27:57 +0100 |
|---|---|---|
| committer | Carsten Dominik <carsten.dominik@gmail.com> | 2011-03-01 07:27:57 +0100 |
| commit | 5726eb067647909ea7510b63bba6feee7acd4543 (patch) | |
| tree | 12e043e0b782416c742ae0e1db0bee72994b95ab | |
| parent | aaf0e2d6bb1a24c26a691b86e8c98b81547ae87a (diff) | |
| download | org-mode-5726eb067647909ea7510b63bba6feee7acd4543.tar.gz | |
Bind some local variables
* lisp/org-agenda.el (org-agenda-get-scheduled):
(org-agenda-get-timestamps): Bind local variable `show-all'.
| -rw-r--r-- | lisp/org-agenda.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 91dff40..ea822da 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -4695,7 +4695,7 @@ This function is invoked if `org-agenda-todo-ignore-deadlines', "\\|\\(<%%\\(([^>\n]+)\\)>\\)")) marker hdmarker deadlinep scheduledp clockp closedp inactivep donep tmp priority category ee txt timestr tags b0 b3 e3 head - todo-state end-of-match) + todo-state end-of-match show-all) (goto-char (point-min)) (while (setq end-of-match (re-search-forward regexp nil t)) (setq b0 (match-beginning 0) @@ -5051,7 +5051,7 @@ FRACTION is what fraction of the head-warning time has passed." (cons (marker-position mm) a))) deadline-results)) d2 diff pos pos1 category tags donep - ee txt head pastschedp todo-state face timestr s habitp) + ee txt head pastschedp todo-state face timestr s habitp show-all) (goto-char (point-min)) (while (re-search-forward regexp nil t) (catch :skip |