branch: externals/org commit abe7222ed8af9b75a109e97ff9ee36d2f8ca466a Author: Ihor Radchenko <yanta...@gmail.com> Commit: Ihor Radchenko <yanta...@gmail.com>
Add declares to suppress compiler warnings --- lisp/ob-core.el | 5 +++-- lisp/ob-ref.el | 2 +- lisp/ol-bibtex.el | 2 +- lisp/org-compat.el | 3 ++- lisp/org-keys.el | 2 +- lisp/org-list.el | 2 +- lisp/org-macro.el | 2 ++ lisp/org-table.el | 1 + lisp/org.el | 12 ++++++++++-- 9 files changed, 22 insertions(+), 9 deletions(-) diff --git a/lisp/ob-core.el b/lisp/ob-core.el index cd4f7e9..7a9467b 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -53,7 +53,8 @@ (declare-function org-cycle "org" (&optional arg)) (declare-function org-edit-src-code "org-src" (&optional code edit-buffer-name)) (declare-function org-edit-src-exit "org-src" ()) -(declare-function org-element-at-point "org-element" ()) +(declare-function org-element-at-point "org-element" (&optional pom cached-only)) +(declare-function org-element-at-point-no-context "org-element" (&optional pom)) (declare-function org-element-context "org-element" (&optional element)) (declare-function org-element-normalize-string "org-element" (s)) (declare-function org-element-property "org-element" (property element)) @@ -70,7 +71,7 @@ (declare-function org-list-to-lisp "org-list" (&optional delete)) (declare-function org-macro-escape-arguments "org-macro" (&rest args)) (declare-function org-mark-ring-push "org" (&optional pos buffer)) -(declare-function org-narrow-to-subtree "org" ()) +(declare-function org-narrow-to-subtree "org" (&optional element)) (declare-function org-next-block "org" (arg &optional backward block-regexp)) (declare-function org-open-at-point "org" (&optional in-emacs reference-buffer)) (declare-function org-previous-block "org" (arg &optional block-regexp)) diff --git a/lisp/ob-ref.el b/lisp/ob-ref.el index a7ab299..7bf6a5d 100644 --- a/lisp/ob-ref.el +++ b/lisp/ob-ref.el @@ -62,8 +62,8 @@ (declare-function org-id-find-id-file "org-id" (id)) (declare-function org-id-find-id-in-file "org-id" (id file &optional markerp)) (declare-function org-in-commented-heading-p "org" (&optional no-inheritance)) -(declare-function org-narrow-to-subtree "org" ()) (declare-function org-show-context "org" (&optional key)) +(declare-function org-narrow-to-subtree "org" (&optional element)) (defvar org-babel-update-intermediate nil "Update the in-buffer results of code blocks executed to resolve references.") diff --git a/lisp/ol-bibtex.el b/lisp/ol-bibtex.el index 476095d..4da2692 100644 --- a/lisp/ol-bibtex.el +++ b/lisp/ol-bibtex.el @@ -133,7 +133,7 @@ (declare-function org-heading-components "org" ()) (declare-function org-insert-heading "org" (&optional arg invisible-ok top)) (declare-function org-map-entries "org" (func &optional match scope &rest skip)) -(declare-function org-narrow-to-subtree "org" ()) +(declare-function org-narrow-to-subtree "org" (&optional element)) (declare-function org-set-property "org" (property value)) (declare-function org-toggle-tag "org" (tag &optional onoff)) diff --git a/lisp/org-compat.el b/lisp/org-compat.el index f77f779..df2efc5 100644 --- a/lisp/org-compat.el +++ b/lisp/org-compat.el @@ -40,7 +40,8 @@ (declare-function org-align-tags "org" (&optional all)) (declare-function org-at-heading-p "org" (&optional ignored)) (declare-function org-at-table.el-p "org" ()) -(declare-function org-element-at-point "org-element" ()) +(declare-function org-element-at-point "org-element" (&optional pom cached-only)) +(declare-function org-element-at-point-no-context "org-element" (&optional pom)) (declare-function org-element-context "org-element" (&optional element)) (declare-function org-element-lineage "org-element" (blob &optional types with-self)) (declare-function org-element-type "org-element" (element)) diff --git a/lisp/org-keys.el b/lisp/org-keys.el index a10db7e..1034565 100644 --- a/lisp/org-keys.el +++ b/lisp/org-keys.el @@ -128,7 +128,7 @@ (declare-function org-metaup "org" (&optional _arg)) (declare-function org-narrow-to-block "org" ()) (declare-function org-narrow-to-element "org" ()) -(declare-function org-narrow-to-subtree "org" ()) +(declare-function org-narrow-to-subtree "org" (&optional element)) (declare-function org-next-block "org" (arg &optional backward block-regexp)) (declare-function org-next-link "org" (&optional search-backward)) (declare-function org-next-visible-heading "org" (arg)) diff --git a/lisp/org-list.el b/lisp/org-list.el index 6d3ef7c..b08e72e 100644 --- a/lisp/org-list.el +++ b/lisp/org-list.el @@ -133,7 +133,7 @@ (declare-function org-inlinetask-outline-regexp "org-inlinetask" ()) (declare-function org-level-increment "org" ()) (declare-function org-mode "org" ()) -(declare-function org-narrow-to-subtree "org" ()) +(declare-function org-narrow-to-subtree "org" (&optional element)) (declare-function org-outline-level "org" ()) (declare-function org-previous-line-empty-p "org" ()) (declare-function org-reduced-level "org" (L)) diff --git a/lisp/org-macro.el b/lisp/org-macro.el index 8a6f173..23e5ab4 100644 --- a/lisp/org-macro.el +++ b/lisp/org-macro.el @@ -55,6 +55,8 @@ (declare-function org-element-context "org-element" (&optional element)) (declare-function org-element-copy "org-element" (datum)) (declare-function org-element-macro-parser "org-element" ()) +(declare-function org-element-keyword-parser "org-element" (limit affiliated)) +(declare-function org-element-put-property "org-element" (element property value)) (declare-function org-element-parse-secondary-string "org-element" (string restriction &optional parent)) (declare-function org-element-property "org-element" (property element)) (declare-function org-element-restriction "org-element" (element)) diff --git a/lisp/org-table.el b/lisp/org-table.el index 9340a04..b9357dc 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -56,6 +56,7 @@ (declare-function org-element-parse-buffer "org-element" (&optional granularity visible-only)) (declare-function org-element-property "org-element" (property element)) (declare-function org-element-type "org-element" (element)) +(declare-function org-element-cache-reset "org-element" (&optional all)) (declare-function org-entry-get "org" (pom property &optional inherit literal-nil)) (declare-function org-export-create-backend "ox" (&rest rest) t) (declare-function org-export-data-with-backend "ox" (data backend info)) diff --git a/lisp/org.el b/lisp/org.el index 2dde75d..75ddfa8 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -151,9 +151,11 @@ Stars are put in group 1 and the trimmed body in group 2.") (declare-function org-columns-insert-dblock "org-colview" ()) (declare-function org-duration-from-minutes "org-duration" (minutes &optional fmt canonical)) (declare-function org-duration-to-minutes "org-duration" (duration &optional canonical)) -(declare-function org-element-at-point "org-element" ()) +(declare-function org-element-at-point "org-element" (&optional pom cached-only)) +(declare-function org-element-at-point-no-context "org-element" (&optional pom)) (declare-function org-element-cache-refresh "org-element" (pos)) (declare-function org-element-cache-reset "org-element" (&optional all)) +(declare-function org-element-cache-map "org-element" (func &rest keys)) (declare-function org-element-contents "org-element" (element)) (declare-function org-element-context "org-element" (&optional element)) (declare-function org-element-copy "org-element" (datum)) @@ -161,6 +163,7 @@ Stars are put in group 1 and the trimmed body in group 2.") (declare-function org-element-extract-element "org-element" (element)) (declare-function org-element-insert-before "org-element" (element location)) (declare-function org-element-interpret-data "org-element" (data)) +(declare-function org-element-keyword-parser "org-element" (limit affiliated)) (declare-function org-element-lineage "org-element" (blob &optional types with-self)) (declare-function org-element-link-parser "org-element" ()) (declare-function org-element-map "org-element" (data types fun &optional info first-match no-recursion with-affiliated)) @@ -173,6 +176,7 @@ Stars are put in group 1 and the trimmed body in group 2.") (declare-function org-element-swap-A-B "org-element" (elem-a elem-b)) (declare-function org-element-timestamp-parser "org-element" ()) (declare-function org-element-type "org-element" (element)) +(declare-function org-element--cache-active-p "org-element" ()) (declare-function org-export-dispatch "ox" (&optional arg)) (declare-function org-export-get-backend "ox" (name)) (declare-function org-export-get-environment "ox" (&optional backend subtreep ext-plist)) @@ -187,6 +191,7 @@ Stars are put in group 1 and the trimmed body in group 2.") (declare-function org-latex-make-preamble "ox-latex" (info &optional template snippet?)) (declare-function org-num-mode "org-num" (&optional arg)) (declare-function org-plot/gnuplot "org-plot" (&optional params)) +(declare-function org-persist-read "org-persist" (var &optional buffer)) (declare-function org-tags-view "org-agenda" (&optional todo-only match)) (declare-function org-timer "org-timer" (&optional restart no-insert)) (declare-function org-timer-item "org-timer" (&optional arg)) @@ -197,6 +202,7 @@ Stars are put in group 1 and the trimmed body in group 2.") (declare-function org-toggle-archive-tag "org-archive" (&optional find-done)) (declare-function org-update-radio-target-regexp "ol" ()) +(defvar org-agenda-buffer-name) (defvar org-element-paragraph-separate) (defvar org-indent-indentation-per-level) (defvar org-radio-target-regexp) @@ -3830,7 +3836,7 @@ This is needed for font-lock setup.") "org-agenda" (beg end)) (declare-function org-agenda-set-restriction-lock "org-agenda" (&optional type)) -(declare-function org-agenda-skip "org-agenda" ()) +(declare-function org-agenda-skip "org-agenda" (&optional element)) (declare-function org-attach-expand "org-attach" (file)) (declare-function org-attach-reveal "org-attach" ()) (declare-function org-attach-reveal-in-emacs "org-attach" ()) @@ -4812,6 +4818,8 @@ This is for getting out of special buffers like capture.") ;; babel (require 'ob) +(defvar org-element-cache-persistent); Defined in org-element.el +(defvar org-element-use-cache); Defined in org-element.el ;;;###autoload (define-derived-mode org-mode outline-mode "Org" "Outline-based notes management and organizer, alias