diff options
author | Jambunathan K <kjambunathan@gmail.com> | 2011-07-20 15:44:12 +0530 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2011-07-21 11:18:20 +0200 |
commit | 48b998cefc3d4e4d09b2754ff2c0019b9e026886 (patch) | |
tree | 5c3d05d4346aad979d40d137664c40ad14fe4433 | |
parent | cce01dd380ae0b8d54f623bf6f96e0e1872e8c1f (diff) | |
download | org-mode-48b998cefc3d4e4d09b2754ff2c0019b9e026886.tar.gz |
org-odt: Simplify org-odt-format-org-entity
* contrib/lisp/org-odt.el (org-odt-format-org-entity):
Simplify. Component xml files in odt document are always
utf-8 encoded. As a result, emitting of numeric character
references based on utf-8 value is superfluous.
-rw-r--r-- | contrib/lisp/org-odt.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/contrib/lisp/org-odt.el b/contrib/lisp/org-odt.el index bd2ea33..e0790de 100644 --- a/contrib/lisp/org-odt.el +++ b/contrib/lisp/org-odt.el @@ -771,9 +771,7 @@ PUB-DIR is set, use this as the publishing directory." (format "\n<!-- %s -->\n" comment))) (defun org-odt-format-org-entity (wd) - ;; FIXME: Seems to work. But is this correct? - (let ((s (org-entity-get-representation wd 'utf8))) - (and s (format "&#x%x;" (string-to-char s))))) + (org-entity-get-representation wd 'utf8)) (defun org-odt-fill-tabs-and-spaces (line) (replace-regexp-in-string |