From 4260aad09df9a5dee1971417dcadd4f82fbd7ae1 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Sun, 25 Jan 2009 13:07:23 +0100 Subject: [PATCH] Maintenance: Fix declarations and necessary require statements. --- lisp/ChangeLog | 6 ++++++ lisp/org-table.el | 2 +- lisp/org.el | 2 ++ 3 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index dff602e4c..f48f5b90b 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,11 @@ 2009-01-25 Carsten Dominik + * org.el (org-agenda-tags-todo-honor-ignore-options): Declare + variable. + + * org-table.el (org-table-insert-hline): Fix typo in fuction call + to `backward-char'. + * org-exp.el (org-export-as-html): Remove the initial space from colon examples. diff --git a/lisp/org-table.el b/lisp/org-table.el index db1e7db3f..76af8141b 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -1222,7 +1222,7 @@ With prefix ABOVE, insert above the current line." (interactive "P") (if (not (org-at-table-p)) (error "Not at a table")) - (when (eobp) (insert "\n") (backward-character 1)) + (when (eobp) (insert "\n") (backward-char 1)) (if (not (string-match "|[ \t]*$" (org-current-line-string))) (org-table-align)) (let ((line (org-table-clean-line diff --git a/lisp/org.el b/lisp/org.el index 349c547c0..d5643f1b1 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -2486,6 +2486,7 @@ Normal means, no org-mode-specific context." (declare-function iswitchb-read-buffer (prompt &optional default require-match start matches-set)) (defvar iswitchb-temp-buflist) (declare-function org-gnus-follow-link "org-gnus" (&optional group article)) +(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)) @@ -9269,6 +9270,7 @@ this case the return value is a list of all return values from these calls. MATCHER is a Lisp form to be evaluated, testing if a given set of tags qualifies a headline for inclusion. When TODO-ONLY is non-nil, only lines with a TODO keyword are included in the output." + (require 'org-agenda) (let* ((re (concat "[\n\r]" outline-regexp " *\\(\\<\\(" (mapconcat 'regexp-quote org-todo-keywords-1 "\\|") (org-re