Fix small regressions in Org

diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index 8c06c22c4af96d691c4939c513528c47c8a43b6f..618d5753a464b89a3a7d97708b6d1b07b4e2d73a 100644 (file)
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -1,3 +1,9 @@
+2012-04-03  Bastien Guerry  <bzg@gnu.org>
+
+       * org.el (org-todo): Fix regression: rename `state' to
+       `org-state'.
+       (org-use-effective-time): Fix group and type.
+
 2012-04-02  Bastien Guerry  <bzg@gnu.org>
 
        * org-clock.el (org-clock-out-if-current): Fix regression: rename

diff --git a/lisp/org/org.el b/lisp/org/org.el
index 59b8e3f039189b8c1962061efd2e242e3071ca89..38d4f705742295107bb65c5eb1a68168b8543d0e 100644 (file)
--- 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)))