summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2017-03-11 11:21:26 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2017-03-11 11:21:26 +0100
commitad194846760a8fcde598b8de21ab3e51c4ed394b (patch)
tree97a19c3f36c18b9020252acc14f7e02a993a7023
parenta3747baef9ed8c21b033f0c2cd91a992e399fb34 (diff)
downloadorg-mode-ad194846760a8fcde598b8de21ab3e51c4ed394b.tar.gz
Revert "ox-ascii: Remove useless brackets in sub/super script"
This reverts commit 5b4215eb166554a2a358be457318c4dab5a5b55d.
-rw-r--r--lisp/ox-ascii.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ox-ascii.el b/lisp/ox-ascii.el
index e0419d9..2a129e9 100644
--- a/lisp/ox-ascii.el
+++ b/lisp/ox-ascii.el
@@ -1790,7 +1790,9 @@ CONTENTS is nil. INFO is a plist holding contextual information."
"Transcode a SUBSCRIPT object from Org to ASCII.
CONTENTS is the contents of the object. INFO is a plist holding
contextual information."
- (format (if (string-match-p "[ \t]" contents) "_{%s}" "_%s") contents))
+ (if (org-element-property :use-brackets-p subscript)
+ (format "_{%s}" contents)
+ (format "_%s" contents)))
;;;; Superscript
@@ -1799,7 +1801,9 @@ contextual information."
"Transcode a SUPERSCRIPT object from Org to ASCII.
CONTENTS is the contents of the object. INFO is a plist holding
contextual information."
- (format (if (string-match-p "[ \t]" contents) "^{%s}" "^%s") contents))
+ (if (org-element-property :use-brackets-p superscript)
+ (format "^{%s}" contents)
+ (format "^%s" contents)))
;;;; Strike-through