summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2012-04-17 11:17:17 +0200
committerBastien Guerry <bzg@altern.org>2012-04-17 11:17:17 +0200
commita6349c2f5041ca70bf9b8459c26294251e7629db (patch)
tree8ea8448ea2d93cc7b8580a82d1893e808b0a2a2d
parentec7bd3b1bee7125a998ace624d863a0d380908c9 (diff)
downloadorg-mode-a6349c2f5041ca70bf9b8459c26294251e7629db.tar.gz
Fix compiler warnings.
-rw-r--r--lisp/ob.el2
-rw-r--r--lisp/org-agenda.el23
-rw-r--r--lisp/org-bbdb.el3
3 files changed, 17 insertions, 11 deletions
diff --git a/lisp/ob.el b/lisp/ob.el
index fbce517..160c63a 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -83,6 +83,8 @@
(declare-function org-list-prevs-alist "org-list" (struct))
(declare-function org-list-get-list-end "org-list" (item struct prevs))
(declare-function org-strip-protective-commas "org" (beg end))
+(declare-function org-remove-if "org" (predicate seq))
+(declare-function org-completing-read "org" (&rest args))
(defgroup org-babel nil
"Code block evaluation and management in `org-mode' documents."
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 27f3c9f..609a85c 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -1818,6 +1818,17 @@ works you probably want to add it to `org-agenda-custom-commands' for good."
;;; Multiple agenda buffers support
+(defcustom org-agenda-sticky nil
+ "Non-nil means agenda q key will bury agenda buffers.
+Agenda commands will then show existing buffer instead of generating new ones.
+When nil, `q' will kill the single agenda buffer."
+ :group 'org-agenda
+ :type 'boolean
+ :set (lambda (var val)
+ (if (boundp var)
+ (org-toggle-sticky-agenda (if val 1 0))
+ (set var val))))
+
(defun org-toggle-sticky-agenda (&optional arg)
"Toggle `org-agenda-sticky'."
(interactive "P")
@@ -1832,17 +1843,6 @@ works you probably want to add it to `org-agenda-custom-commands' for good."
(message "Sticky agenda was %s"
(if org-agenda-sticky "enabled" "disabled")))))
-(defcustom org-agenda-sticky nil
- "Non-nil means agenda q key will bury agenda buffers.
-Agenda commands will then show existing buffer instead of generating new ones.
-When nil, `q' will kill the single agenda buffer."
- :group 'org-agenda
- :type 'boolean
- :set (lambda (var val)
- (if (boundp var)
- (org-toggle-sticky-agenda (if val 1 0))
- (set var val))))
-
(defvar org-agenda-buffer nil
"Agenda buffer currently being generated.")
@@ -5136,6 +5136,7 @@ please use `org-class' instead."
dayname skip-weeks)))
(make-obsolete 'org-diary-class 'org-class "")
+(defvar org-agenda-show-log-scoped) ;; dynamically scope in ̀org-timeline' or`org-agenda-list'
(defalias 'org-get-closed 'org-agenda-get-progress)
(defun org-agenda-get-progress ()
"Return the logged TODO entries for agenda display."
diff --git a/lisp/org-bbdb.el b/lisp/org-bbdb.el
index f320d56..7f89f24 100644
--- a/lisp/org-bbdb.el
+++ b/lisp/org-bbdb.el
@@ -116,6 +116,9 @@
(declare-function bbdb-search-name "ext:bbdb-com" (regexp &optional layout))
(declare-function bbdb-search-organization "ext:bbdb-com" (regexp &optional layout))
+;; `bbdb-record-note' is part of BBDB v3.x
+(declare-function bbdb-record-note "ext:bbdb" (record label))
+
(declare-function calendar-leap-year-p "calendar" (year))
(declare-function diary-ordinal-suffix "diary-lib" (n))