summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJambunathan K <kjambunathan@gmail.com>2012-04-16 23:30:29 +0530
committerJambunathan K <kjambunathan@gmail.com>2012-04-16 23:30:29 +0530
commitdf6f574b139e99a15035be14ba21fc44ae6cc406 (patch)
treee19fde62a4dd283a9f72af6171b3a4fb1055a73f
parent4959371373cc4f135cd517678e22382cfb5960c1 (diff)
downloadorg-mode-df6f574b139e99a15035be14ba21fc44ae6cc406.tar.gz
org-e-html.el: Fix charset
-rw-r--r--EXPERIMENTAL/org-e-html.el18
1 files changed, 10 insertions, 8 deletions
diff --git a/EXPERIMENTAL/org-e-html.el b/EXPERIMENTAL/org-e-html.el
index 0ac5bd5..f7ab3ff 100644
--- a/EXPERIMENTAL/org-e-html.el
+++ b/EXPERIMENTAL/org-e-html.el
@@ -201,10 +201,11 @@ and corresponding declarations."
(cons (string :tag "Extension")
(string :tag "Declaration")))))
-(defcustom org-e-html-coding-system nil
- "Coding system for HTML export, defaults to `buffer-file-coding-system'."
- :group 'org-export-e-html
- :type 'coding-system)
+;; Use `org-export-coding-system' instead
+;; (defcustom org-e-html-coding-system nil
+;; "Coding system for HTML export, defaults to `buffer-file-coding-system'."
+;; :group 'org-export-e-html
+;; :type 'coding-system)
(defvar org-e-html-content-div "content"
"The name of the container DIV that holds all the page contents.
@@ -1491,10 +1492,11 @@ This function shouldn't be used for floats. See
(format "\n<title>%s</title>\n" title)
(format
"\n<meta http-equiv=\"Content-Type\" content=\"text/html;charset=%s\"/>"
- (and coding-system-for-write
- (fboundp 'coding-system-get)
- (coding-system-get coding-system-for-write
- 'mime-charset)))
+ (or (and org-export-coding-system
+ (fboundp 'coding-system-get)
+ (coding-system-get org-export-coding-system
+ 'mime-charset))
+ "iso-8859-1"))
(format "\n<meta name=\"title\" content=\"%s\"/>" title)
(format "\n<meta name=\"generator\" content=\"Org-mode\"/>")
(format "\n<meta name=\"generated\" content=\"%s\"/>"