瀏覽代碼

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 4 年之前
父節點
當前提交
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