# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1258249523 0
# Node ID 053192c3df596572d8c5b9335e8c0255f8087d31
# Parent  227bcb572dbe5a3ad469ab9265c6735ba3cb9a98
Fix declarations.

diff -r 227bcb572dbe -r 053192c3df59 lisp/org/ChangeLog
--- a/lisp/org/ChangeLog	Sat Nov 14 20:05:33 2009 +0000
+++ b/lisp/org/ChangeLog	Sun Nov 15 01:45:23 2009 +0000
@@ -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 -r 227bcb572dbe -r 053192c3df59 lisp/org/org-agenda.el
--- a/lisp/org/org-agenda.el	Sat Nov 14 20:05:33 2009 +0000
+++ b/lisp/org/org-agenda.el	Sun Nov 15 01:45:23 2009 +0000
@@ -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 -r 227bcb572dbe -r 053192c3df59 lisp/org/org.el
--- a/lisp/org/org.el	Sat Nov 14 20:05:33 2009 +0000
+++ b/lisp/org/org.el	Sun Nov 15 01:45:23 2009 +0000
@@ -3091,7 +3091,7 @@
 (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))