diff options
author | Bastien Guerry <bzg@altern.org> | 2013-04-08 21:08:07 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-04-08 21:25:10 +0200 |
commit | 15d6dd651b9b996b60ae374b0f6cddde82e3a86c (patch) | |
tree | cf56ce71ef6fbb27c625702a3be023611b999831 | |
parent | c25566fec3cf88892a9fe707c4fb6e7143e233c4 (diff) | |
download | org-mode-15d6dd651b9b996b60ae374b0f6cddde82e3a86c.tar.gz |
org-agenda.el (org-agenda-goto-date): Redo an agenda* if needed
* org-agenda.el (org-agenda-goto-date): If the agenda was
built as agenda* (scheduled/deadline items with hour spec)
then redo an agenda*.
-rw-r--r-- | lisp/org-agenda.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 3abfb6b..cc0eed5 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7729,8 +7729,9 @@ Negative selection means regexp must not match for selection of an entry." (args (get-text-property (min (1- (point-max)) (point)) 'org-last-args)) (0-arg (or current-prefix-arg (car args))) (2-arg (nth 2 args)) + (with-hour-p (nth 4 org-agenda-redo-command)) (newcmd (list 'org-agenda-list 0-arg date - (org-agenda-span-to-ndays 2-arg))) + (org-agenda-span-to-ndays 2-arg) with-hour-p)) (newargs (cdr newcmd)) (inhibit-read-only t) org-agenda-sticky) |