فهرست منبع

org-e-html.el: Remove org-element and org-export related declarations

Jambunathan K 13 سال پیش
والد
کامیت
fe2e2f1550
1فایلهای تغییر یافته به همراه1 افزوده شده و 39 حذف شده
  1. 1 39
      contrib/lisp/org-e-html.el

+ 1 - 39
contrib/lisp/org-e-html.el

@@ -43,40 +43,6 @@
 
 
 ;;; Function Declarations
 ;;; Function Declarations
 
 
-(declare-function org-element-get-property "org-element" (property element))
-(declare-function org-element-normalize-string "org-element" (s))
-
-(declare-function org-export-data "org-export" (data info))
-(declare-function org-export-directory "org-export" (type plist))
-(declare-function org-export-expand-macro "org-export" (macro info))
-(declare-function org-export-first-sibling-p "org-export" (headline info))
-(declare-function org-export-footnote-first-reference-p "org-export"
-		  (footnote-reference info))
-(declare-function org-export-get-coderef-format "org-export" (path desc))
-(declare-function org-export-get-footnote-definition "org-export"
-		  (footnote-reference info))
-(declare-function org-export-get-footnote-number "org-export" (footnote info))
-(declare-function org-export-get-previous-element "org-export" (blob info))
-(declare-function org-export-get-relative-level "org-export" (headline info))
-(declare-function org-export-handle-code
-		  "org-export" (element info &optional num-fmt ref-fmt delayed))
-(declare-function org-export-inline-image-p "org-export"
-		  (link &optional extensions))
-(declare-function org-export-last-sibling-p "org-export" (headline info))
-(declare-function org-export-low-level-p "org-export" (headline info))
-(declare-function org-export-output-file-name
-		  "org-export" (extension &optional subtreep pub-dir))
-(declare-function org-export-resolve-coderef "org-export" (ref info))
-(declare-function org-export-resolve-fuzzy-link "org-export" (link info))
-(declare-function org-export-resolve-radio-link "org-export" (link info))
-(declare-function org-export-solidify-link-text "org-export" (s))
-(declare-function
- org-export-to-buffer "org-export"
- (backend buffer &optional subtreep visible-only body-only ext-plist))
-(declare-function
- org-export-to-file "org-export"
- (backend file &optional subtreep visible-only body-only ext-plist))
-
 (declare-function org-id-find-id-file "org-id" (id))
 (declare-function org-id-find-id-file "org-id" (id))
 (declare-function htmlize-region "ext:htmlize" (beg end))
 (declare-function htmlize-region "ext:htmlize" (beg end))
 (declare-function org-pop-to-buffer-same-window
 (declare-function org-pop-to-buffer-same-window
@@ -1252,10 +1218,6 @@ ATTR is a string of other attributes of the \"a\" element."
 
 
 ;;;; Table
 ;;;; Table
 
 
-(defun org-e-html-format-table (lines olines)
-  (let ((org-e-html-format-table-no-css nil))
-    (org-lparse-format-table lines olines)))
-
 (defun org-e-html-splice-attributes (tag attributes)
 (defun org-e-html-splice-attributes (tag attributes)
   "Read attributes in string ATTRIBUTES, add and replace in HTML tag TAG."
   "Read attributes in string ATTRIBUTES, add and replace in HTML tag TAG."
   (if (not attributes)
   (if (not attributes)
@@ -1364,7 +1326,7 @@ that uses these same face definitions."
 		   text
 		   text
 		   (and tags "   ") (org-e-html--tags tags))))
 		   (and tags "   ") (org-e-html--tags tags))))
     (format "<a href=\"#%s\">%s</a>"
     (format "<a href=\"#%s\">%s</a>"
-	    (org-solidify-link-text headline-label)
+	    (org-export-solidify-link-text headline-label)
 	    (if (not nil) headline
 	    (if (not nil) headline
 	      (format "<span class=\"%s\">%s</span>" todo-type headline)))))
 	      (format "<span class=\"%s\">%s</span>" todo-type headline)))))