added .el style file for emacs (wip)

1 files changed, 56 insertions, 0 deletions

diff --git a/ekdosis.el b/ekdosis.el
new file mode 100644
index 0000000..63230a0
--- /dev/null
+++ b/ekdosis.el
@@ -0,0 +1,56 @@
+;;; ekdosis.el --- AUCTeX style for `ekdosis.sty'
+;; This file is part of the `ekdosis' package
+
+;; ekdosis -- TEI xml compliant critical editions
+;; Copyright (C) 2020  Robert Alessi
+
+;; Please send error reports and suggestions for improvements to Robert
+;; Alessi <alessi@robertalessi.net>
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see
+;; <http://www.gnu.org/licenses/>.
+
+(defvar LaTeX-ekdosis-preamble-options
+  '(;;
+    ("parnotes" ("true" "false" "roman"))
+    ("teiexport" ("true" "false" "tidy"))
+    ("layout" ("float" "footins"))
+    )
+  "Package options for the ekdosis package.")
+
+(defun LaTeX-ekdosis-package-options ()
+  "Prompt for package options for ekdosis package."
+  (TeX-read-key-val t
+                    (append LaTeX-ekdosis-preamble-options)))
+
+(TeX-add-style-hook
+ "eksosis"
+ (lambda ()
+   ;; Folding features:
+   (add-to-list (make-local-variable 'LaTeX-fold-macro-spec-list)
+                '("{1}"
+                  ("app"))
+                '("{7}||{6}||{5}||{4}||{3}||{2}||{1}"
+                  ("lem"))
+                '("[r]"
+                  ("rdg"))
+                '("[n]"
+                  ("note"))
+                t)
+   ;; This package relies on lualatex, so check for it:
+   (TeX-check-engine-add-engines 'luatex)
+   )
+ LaTeX-dialect)
+
+;;; ekdosis.el ends here