Merge branch 'hotfix-7.8.06'

This commit is contained in:
Bastien Guerry 2012-04-02 11:27:48 +02:00
commit 88b2228297
1 changed files with 1 additions and 1 deletions

View File

@ -11379,7 +11379,7 @@ For calling through lisp, arg is also interpreted in the following way:
(car tail))))
(org-state (or
(run-hook-with-args-until-success
'org-todo-get-default-hook state org-last-state)
'org-todo-get-default-hook org-state org-last-state)
org-state))
(next (if org-state (concat " " org-state " ") " "))
(change-plist (list :type 'todo-state-change :from this :to org-state