ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

HTML Export: Allow Greek letters in subscripts 

Hsiu-Khuern Tang writes:

>  If I export the file
>
>  --------------------------------------------------
>  #+OPTIONS: ^:{}
>
>  * test
>
>   a_{\alpha}
>
>   a_{foo}
>  --------------------------------------------------
>
>  as HTML, I get "a_{&alpha;}" but "a<sub>foo</sub>": \alpha is not
>  subscripted but foo is.  I was expecting both to be subscripted,
>  since they are in {}.

This is a bug, fixed now.
This commit is contained in:
Carsten Dominik 2009-03-11 10:12:21 +01:00
parent 680d8cb440
commit 13f619d07a
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2009-03-11 Carsten Dominik <carsten.dominik@gmail.com>
* org-exp.el (org-create-multibrace-regexp): Do not add
backslashes to the class.
2009-03-10 Carsten Dominik <carsten.dominik@gmail.com> 2009-03-10 Carsten Dominik <carsten.dominik@gmail.com>
* org-colview.el (org-columns-map): Better functions for moving up * org-colview.el (org-columns-map): Better functions for moving up

2
lisp/org-exp.el
View File

@ -4689,7 +4689,7 @@ The regexp returned will match the entire expression including the
delimiters. It will also define a single group which contains the delimiters. It will also define a single group which contains the
match except for the outermost delimiters. The maximum depth of match except for the outermost delimiters. The maximum depth of
stacked delimiters is N. Escaping delimiters is not possible." stacked delimiters is N. Escaping delimiters is not possible."
(let* ((nothing (concat "[^" "\\" left "\\" right "]*?")) (let* ((nothing (concat "[^" left right "]*?"))
(or "\\|") (or "\\|")
(re nothing) (re nothing)
(next (concat "\\(?:" nothing left nothing right "\\)+" nothing))) (next (concat "\\(?:" nothing left nothing right "\\)+" nothing)))