summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarsten Dominik <carsten.dominik@gmail.com>2010-04-01 17:49:45 +0200
committerCarsten Dominik <carsten.dominik@gmail.com>2010-04-01 17:49:45 +0200
commita025579e5095839ee305386310598d19542bf1aa (patch)
treeeff54b5a2e0db6a609ba8ee7619e1116ebbcc9ff
parentf84a8a8651ac815a144f52bc17f9116e97ae5688 (diff)
downloadorg-mode-a025579e5095839ee305386310598d19542bf1aa.tar.gz
Fix bug in ASCII export of \n
-rwxr-xr-xlisp/ChangeLog3
-rw-r--r--lisp/org-entities.el3
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 44501ac..8ff651c 100755
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
2010-04-01 Carsten Dominik <carsten.dominik@gmail.com>
+ * org-entities.el (org-entity-get-representation): Catch the case
+ that there is not entry in the list.
+
* org-mobile.el (org-mobile-use-encryption)
(org-mobile-encryption-tempfile, org-mobile-encryption-password):
New options.
diff --git a/lisp/org-entities.el b/lisp/org-entities.el
index 47bbdb6..5a12bda 100644
--- a/lisp/org-entities.el
+++ b/lisp/org-entities.el
@@ -429,7 +429,8 @@ Kind can be any of `latex', `html', `ascii', `latin1', or `utf8'."
(n (cdr (assq kind '((latex . 1) (html . 3) (ascii . 4)
(latin1 . 5) (utf8 . 6)))))
(r (and e n (nth n e))))
- (if (and (not org-entities-ascii-explanatory)
+ (if (and e r
+ (not org-entities-ascii-explanatory)
(memq kind '(ascii latin1 utf8))
(= (string-to-char r) ?\[))
(concat "\\" name)