浏览代码

org-src.el: Fix nativecomp warnings

* lisp/org-src.el: Declare `org-element--parse-paired-brackets'
function.  Declare `org-src-fontify-natively' variable.
Ihor Radchenko 3 年之前
父节点
当前提交
7ac37478ca
共有 1 个文件被更改,包括 2 次插入0 次删除
  1. 2 0
      lisp/org-src.el

+ 2 - 0
lisp/org-src.el

@@ -45,6 +45,7 @@
 (declare-function org-element-context "org-element" (&optional element))
 (declare-function org-element-context "org-element" (&optional element))
 (declare-function org-element-lineage "org-element"
 (declare-function org-element-lineage "org-element"
 		  (blob &optional types with-self))
 		  (blob &optional types with-self))
+(declare-function org-element--parse-paired-brackets "org-element" (char))
 (declare-function org-element-property "org-element" (property element))
 (declare-function org-element-property "org-element" (property element))
 (declare-function org-element-type "org-element" (element))
 (declare-function org-element-type "org-element" (element))
 (declare-function org-footnote-goto-definition "org-footnote"
 (declare-function org-footnote-goto-definition "org-footnote"
@@ -614,6 +615,7 @@ Leave point in edit buffer."
 
 
 ;;; Fontification of source blocks
 ;;; Fontification of source blocks
 
 
+(defvar org-src-fontify-natively) ; Defined in org.el
 (defun org-src-font-lock-fontify-block (lang start end)
 (defun org-src-font-lock-fontify-block (lang start end)
   "Fontify code block between START and END using LANG's syntax.
   "Fontify code block between START and END using LANG's syntax.
 This function is called by Emacs' automatic fontification, as long
 This function is called by Emacs' automatic fontification, as long