summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <guerry@bzg.ath.cx>2008-02-11 02:45:52 +0000
committerBastien Guerry <guerry@bzg.ath.cx>2008-02-11 02:45:52 +0000
commitd6e407961522831bc43f5a584dfae4a4f97d7235 (patch)
tree11418611ac254239a79405546a51fd8a496f247c
parentd3fbe8150272e91e52325cf3291a299a16a7d812 (diff)
downloadorg-mode-d6e407961522831bc43f5a584dfae4a4f97d7235.tar.gz
Use :html-extension in org-export-html-extension.
So that :html-extension in projects of `org-publish-project-alist' is correctly honoured.
-rw-r--r--org.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/org.el b/org.el
index 15c8e37..298242c 100644
--- a/org.el
+++ b/org.el
@@ -24832,6 +24832,7 @@ the body tags themselves."
(org-infile-export-plist)))
(style (plist-get opt-plist :style))
+ (html-extension (plist-get opt-plist :html-extension))
(link-validate (plist-get opt-plist :link-validation-function))
valid thetoc have-headings first-heading-pos
(odd org-odd-levels-only)
@@ -24857,7 +24858,7 @@ the body tags themselves."
(org-entry-get (region-beginning)
"EXPORT_FILE_NAME" t))
(file-name-nondirectory buffer-file-name)))
- "." org-export-html-extension)
+ "." html-extension)
(file-name-as-directory
(org-export-directory :html opt-plist)))))
(current-dir (if buffer-file-name
@@ -25213,7 +25214,7 @@ lang=\"%s\" xml:lang=\"%s\">
(string-match "\\.org$" thefile))
(setq thefile (concat (substring thefile 0
(match-beginning 0))
- "." org-export-html-extension))
+ "." html-extension))
(if (and search
;; make sure this is can be used as target search
(not (string-match "^[0-9]*$" search))