Fix declarations.

diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index 6a4e5d7235338915135c9567983e1620bbefa240..03b2a9dcb940998e7f72d70466ca4e91f92fd8bc 100644 (file)
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -1,3 +1,9 @@
+2009-11-15  Glenn Morris  <rgm@gnu.org>
+
+       * org-agenda.el (org-datetree-find-date-create)
+       (org-habit-get-priority):
+       * org.el (org-format-agenda-item): Fix declarations.
+
 2009-11-13  Carsten Dominik  <carsten.dominik@gmail.com>
 
        * org.el (org-clone-subtree-with-time-shift): Make it work at the

diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el
index 544e933f5d95a6d8d0c4a0adf49b4f914dfcd859..7a311084b2c2751c656f117a5370463ae3456d8d 100644 (file)
--- a/lisp/org/org-agenda.el
+++ b/lisp/org/org-agenda.el
@@ -52,7 +52,8 @@
 (declare-function calendar-julian-date-string   "cal-julian" (&optional date))
 (declare-function calendar-mayan-date-string    "cal-mayan"  (&optional date))
 (declare-function calendar-persian-date-string  "cal-persia" (&optional date))
-(declare-function org-datetree-find-date-create "org-datetree" (date))
+(declare-function org-datetree-find-date-create "org-datetree"
+                 (date &optional keep-restriction))
 (declare-function org-columns-quit              "org-colview" ())
 (declare-function diary-date-display-form       "diary-lib"  (&optional type))
 (declare-function org-mobile-write-agenda-for-mobile "org-mobile" (file))
@@ -60,7 +61,7 @@
                  "org-habit" (&optional line))
 (declare-function org-is-habit-p "org-habit" (&optional pom))
 (declare-function org-habit-parse-todo "org-habit" (&optional pom))
-(declare-function org-habit-get-priority "org-habit" (habit))
+(declare-function org-habit-get-priority "org-habit" (habit &optional moment))
 (defvar calendar-mode-map)
 (defvar org-mobile-force-id-on-agenda-items) ; defined in org-mobile.el
 (defvar org-habit-show-habits)

diff --git a/lisp/org/org.el b/lisp/org/org.el
index 7b2e95b0976ab0221b765635d4744cdd1b11cda6..06b6e337217ab8eaa1bf1bbab78acd058f77c5b8 100644 (file)
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -3091,7 +3091,7 @@ Normal means, no org-mode-specific context."
 (defvar org-agenda-tags-todo-honor-ignore-options)
 (declare-function org-agenda-skip "org-agenda" ())
 (declare-function org-format-agenda-item "org-agenda"
-                 (extra txt &optional category tags dotime noprefix remove-re))
+                  (extra txt &optional category tags dotime noprefix remove-re habitp))
 (declare-function org-agenda-new-marker "org-agenda" (&optional pos))
 (declare-function org-agenda-change-all-lines "org-agenda"
                  (newhead hdmarker &optional fixface just-this))