瀏覽代碼

ASCII export: swallow {} after entity macro

* lisp/org-ascii.el (org-ascii-replace-entities): Match an optional {}
after an entity.
Carsten Dominik 14 年之前
父節點
當前提交
f66f0430d8
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-ascii.el

+ 1 - 1
lisp/org-ascii.el

@@ -595,7 +595,7 @@ publishing directory."
 (defun org-ascii-replace-entities ()
   "Replace entities with the ASCII representation."
   (let (e)
-    (while (re-search-forward "\\\\\\([a-zA-Z]+[0-9]*\\)" nil t)
+    (while (re-search-forward "\\\\\\([a-zA-Z]+[0-9]*\\)\\({}\\)?" nil t)
       (org-if-unprotected-at (match-beginning 1)
 	(setq e (org-entity-get-representation (match-string 1)
 					       org-export-ascii-entities))