[elpa] externals/org cfe5e01e14: org-lint: Add checker for $...$ LaTeX fragments

[ELPA Syncer]

branch: externals/org
commit cfe5e01e1425e475b3b5f198498cfd1b4b3d3536
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-lint: Add checker for $...$ LaTeX fragments
    
    * lisp/org-lint.el (org-lint-LaTeX-$): New checker warning about
    semi-obsolete $...$ LaTeX fragment syntax.
    
    Link: https://orgmode.org/list/86ileukojk.fsf@lan
---
 lisp/org-lint.el | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/lisp/org-lint.el b/lisp/org-lint.el
index 55f987ea3e..453fc98dd8 100644
--- a/lisp/org-lint.el
+++ b/lisp/org-lint.el
@@ -1251,6 +1251,14 @@ Use \"export %s\" instead"
              (format "Bullet counter \"%s\" is not the same with item position 
%d.  Consider adding manual [@%d] counter."
                      bullet (car (last true-number)) bullet-number))))))))
 
+(defun org-lint-LaTeX-$ (ast)
+  "Report semi-obsolete $...$ LaTeX fragments."
+  (org-element-map ast 'latex-fragment
+    (lambda (fragment)
+      (and (string-match-p "^[$][^$]" (org-element-property :value fragment))
+           (list (org-element-property :begin fragment)
+                 "Potentially confusing LaTeX fragment format.  Prefer using 
more reliable \\(...\\)")))))
+
 
 ;;; Checkers declaration
 
@@ -1479,6 +1487,11 @@ Use \"export %s\" instead"
   #'org-lint-item-number
   :categories '(plain-list))
 
+(org-lint-add-checker 'LaTeX-$
+  "Report potentially confusing $...$ LaTeX markup."
+  #'org-lint-LaTeX-$
+  :categories '(markup))
+
 (provide 'org-lint)
 
 ;; Local variables: