added .el style file for emacs (wip)

2 files changed, 68 insertions, 5 deletions

diff --git a/Makefile b/Makefile
index e4e89a2..34e846c 100644
--- a/Makefile
+++ b/Makefile
@@ -5,6 +5,7 @@ PWD   = $(shell pwd)
 VERS  = $(shell ltxfileinfo -v $(NAME).dtx|sed -e 's/^v//')
 LOCAL = $(shell kpsewhich --var-value TEXMFLOCAL)
 UTREE = $(shell kpsewhich --var-value TEXMFHOME)
+HOMEDIR := $$HOME
 all:    $(NAME).pdf
         test -e README.txt && mv README.txt README || exit 0
 $(NAME).pdf: $(NAME).dtx
@@ -14,23 +15,29 @@ $(NAME).pdf: $(NAME).dtx
         $(CMP) --shell-escape --recorder --interaction=nonstopmode $(NAME).dtx > /dev/null
         $(CMP) --shell-escape --recorder --interaction=nonstopmode $(NAME).dtx > /dev/null
 clean:
+        rm -rf _minted-*
         rm -f $(NAME).{aux,fls,glo,gls,hd,idx,ilg,ind,log,out,toc,pyg}
         rm -f *~
         rm -rf auto/
 #       rm -f $(NAME)_*.{bib,lua}
+auctex:
+        if [ ! -d "$(HOMEDIR)/.emacs.d/auctex/auto" ]; then \
+        mkdir -p $(HOMEDIR)/.emacs.d/auctex/auto; \
+        fi
+        cp $(NAME)*.el $(HOMEDIR)/.emacs.d/auctex/auto
 distclean: clean uninst
-        rm -rf _minted-*
         rm -f $(NAME).{pdf,sty,lua} README*
         rm -f *.zip *.tar.gz
 uninst:
         rm -rf $(UTREE)/{tex,source,doc}/lualatex/$(NAME)
-inst: uninst all
+        rm -rf $(HOMEDIR)/.emacs.d/auctex/auto/$(NAME).{el,elc}
+inst: uninst auctex all
         mkdir -p $(UTREE)/{tex,source,doc}/lualatex/$(NAME)
         cp $(NAME).dtx $(UTREE)/source/lualatex/$(NAME)
         cp $(NAME).sty $(UTREE)/tex/lualatex/$(NAME)
         cp $(NAME).lua $(UTREE)/tex/lualatex/$(NAME)
         cp $(NAME).pdf $(UTREE)/doc/lualatex/$(NAME)
-local: uninst
+local: uninst auctex
         $(CMP) $(NAME).ins
         mkdir -p $(UTREE)/{tex,source,doc}/lualatex/$(NAME)
         cp $(NAME).sty $(UTREE)/tex/lualatex/$(NAME)
@@ -42,7 +49,7 @@ local: uninst
 #       sudo cp $(NAME).pdf $(LOCAL)/doc/lualatex/$(NAME)
 zip: all
         ln -sf . $(NAME)
-        zip -Drq $(PWD)/$(NAME)-$(VERS).zip $(NAME)/{README,$(NAME).{pdf,sty,lua}}
+        zip -Drq $(PWD)/$(NAME)-$(VERS).zip $(NAME)/{README,$(NAME).{pdf,sty,lua,el}}
         rm $(NAME)
 package: distclean all
         mkdir $(NAME)/
@@ -50,7 +57,7 @@ package: distclean all
         mkdir -p tex/lualatex/$(NAME)/
         cp *.lua *.sty tex/lualatex/$(NAME)/
         mkdir -p doc/lualatex/$(NAME)/
-        cp *.pdf doc/lualatex/$(NAME)/
+        cp *.el *.pdf doc/lualatex/$(NAME)/
         mkdir -p source/lualatex/$(NAME)/
         cp Makefile *.dtx source/lualatex/$(NAME)/
         zip -r $(NAME).tds.zip tex doc source
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