new alternate command \App to allow for better code folding with ekdosis.el

1 files changed, 8 insertions, 0 deletions

diff --git a/ekdosis.el b/ekdosis.el
index 50c6364..21d202f 100644
--- a/ekdosis.el
+++ b/ekdosis.el
@@ -257,6 +257,9 @@
                                            ("resetvlinenumber" . nil))))
    ;; Folding features:
    (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
+                '("{1}" ("App"))
+                t)
+   (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
                 '("{1}" ("app"))
                 t)
    (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
@@ -269,6 +272,9 @@
                 '("[n]" ("note"))
                 t)
    (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
+                '("[n]" ("note*"))
+                t)
+   (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
                 '("[l]" ("linelabel"))
                 t)
    (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
@@ -330,6 +336,8 @@
       0)
     '("ilabel" "indexed label"
       0)
+    '("App" [ TeX-arg-key-val LaTeX-ekdosis-app-options ]
+      2)
     '("app" [ TeX-arg-key-val LaTeX-ekdosis-app-options ]
       t)
     '("lem" [ LaTeX-ekdosis-long-key-val LaTeX-ekdosis-lem-options ]