diff options
author | Bastien Guerry <bzg@altern.org> | 2012-09-29 13:44:19 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2012-09-29 13:44:19 +0200 |
commit | a6417c62cfe7b622ff50078bae10962818c74046 (patch) | |
tree | 46a7fd18b7f770b195a05e4722200fa7b34005ca | |
parent | ba9606e6e16ad1ee9901e8fe5f729b9abd32553b (diff) | |
download | org-mode-a6417c62cfe7b622ff50078bae10962818c74046.tar.gz |
org-agenda.el (org-todo-list): Fix redoing of todo agenda when `org-agenda-sticky' is non-nil
* org-agenda.el (org-todo-list): Fix redoing of todo agenda
when `org-agenda-sticky' is non-nil.
-rwxr-xr-x | lisp/org-agenda.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 4720a72..0a53055 100755 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -4369,7 +4369,10 @@ for a keyword. A numeric prefix directly selects the Nth keyword in (org-compile-prefix-format 'todo) (org-set-sorting-strategy 'todo) (setq org-agenda-redo-command - `(org-todo-list (or current-prefix-arg (quote ,arg)))) + `(org-todo-list (or (and (numberp current-prefix-arg) current-prefix-arg) + ;; (and (stringp (quote ,arg)) (quote ,arg)) + ,org-select-this-todo-keyword + current-prefix-arg ,arg))) (setq files (org-agenda-files nil 'ifmode) rtnall nil) (while (setq file (pop files)) |