From 5c7ac47249bc16f6efc3085bc72a2d519ae1d834 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 3 Apr 2012 12:28:31 +0200 Subject: [PATCH] Fix small regressions in Org --- lisp/org/ChangeLog | 6 ++++++ lisp/org/org.el | 6 +++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog index 8c06c22c4af..618d5753a46 100644 --- a/lisp/org/ChangeLog +++ b/lisp/org/ChangeLog @@ -1,3 +1,9 @@ +2012-04-03 Bastien Guerry + + * org.el (org-todo): Fix regression: rename `state' to + `org-state'. + (org-use-effective-time): Fix group and type. + 2012-04-02 Bastien Guerry * org-clock.el (org-clock-out-if-current): Fix regression: rename diff --git a/lisp/org/org.el b/lisp/org/org.el index 59b8e3f0391..38d4f705742 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el @@ -2816,8 +2816,8 @@ be the favorite working time of John Wiegley :-)" For example, if `org-extend-today-until' is 8, and it's 4am, then the \"effective time\" of any timestamps between midnight and 8am will be 23:59 of the previous day." - :group 'boolean - :type 'integer) + :group 'org-time + :type 'boolean) (defcustom org-edit-timestamp-down-means-later nil "Non-nil means S-down will increase the time in a time stamp. @@ -11380,7 +11380,7 @@ For calling through lisp, arg is also interpreted in the following way: ;; It is now done, and it was not done before (org-add-planning-info 'closed (org-current-effective-time)) (if (and (not dolog) (eq 'note org-log-done)) - (org-add-log-setup 'done state this 'findpos 'note))) + (org-add-log-setup 'done org-state this 'findpos 'note))) (when (and org-state dolog) ;; This is a non-nil state, and we need to log it (org-add-log-setup 'state org-state this 'findpos dolog))) -- 2.39.2