Use string-match-p' instead of org-string-match-p'

This commit is contained in:
IGARASHI Masanao
2016-12-20 02:43:29 +09:00
parent d4d1e05028
commit cabcc1a398

View File

@@ -1179,9 +1179,9 @@ containing export options. Modify DATA by side-effect and return it."
(entity (org-element-property :latex-math-p obj)) (entity (org-element-property :latex-math-p obj))
(latex-fragment (latex-fragment
(let ((value (org-element-property :value obj))) (let ((value (org-element-property :value obj)))
(or (org-string-match-p "\\`\\\\([^\000]*\\\\)\\'" value) (or (string-match-p "\\`\\\\([^\000]*\\\\)\\'" value)
(org-string-match-p "\\`\\$[^\000]*\\$\\'" value) (string-match-p "\\`\\$[^\000]*\\$\\'" value)
(org-string-match-p "\\`\\\\\\[[^\000]*\\\\\\]\\'" value)))) (string-match-p "\\`\\\\\\[[^\000]*\\\\\\]\\'" value))))
((subscript superscript) t)))))) ((subscript superscript) t))))))
(org-element-map data '(entity latex-fragment subscript superscript) (org-element-map data '(entity latex-fragment subscript superscript)
(lambda (object) (lambda (object)