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.
This commit is contained in:
Jambunathan K 2011-07-20 15:44:12 +05:30 committed by Bastien Guerry
parent cce01dd380
commit 48b998cefc
1 changed files with 1 additions and 3 deletions

View File

@ -771,9 +771,7 @@ PUB-DIR is set, use this as the publishing directory."
(format "\n<!-- %s -->\n" comment))) (format "\n<!-- %s -->\n" comment)))
(defun org-odt-format-org-entity (wd) (defun org-odt-format-org-entity (wd)
;; FIXME: Seems to work. But is this correct? (org-entity-get-representation wd 'utf8))
(let ((s (org-entity-get-representation wd 'utf8)))
(and s (format "&#x%x;" (string-to-char s)))))
(defun org-odt-fill-tabs-and-spaces (line) (defun org-odt-fill-tabs-and-spaces (line)
(replace-regexp-in-string (replace-regexp-in-string