diff options
-rw-r--r-- | ekdosis.el | 83 |
1 files changed, 81 insertions, 2 deletions
@@ -34,6 +34,68 @@ | |||
34 | (TeX-read-key-val t | 34 | (TeX-read-key-val t |
35 | (append LaTeX-ekdosis-preamble-options))) | 35 | (append LaTeX-ekdosis-preamble-options))) |
36 | 36 | ||
37 | (defvar LaTeX-ekdosis-app-options | ||
38 | '(;; | ||
39 | ("type") | ||
40 | ) | ||
41 | "Local options.") | ||
42 | |||
43 | (defvar LaTeX-ekdosis-lem-options | ||
44 | '(;; | ||
45 | ("wit") | ||
46 | ("alt") | ||
47 | ("pre") | ||
48 | ("post") | ||
49 | ("prewit") | ||
50 | ("postwit") | ||
51 | ("sep") | ||
52 | ("nolem" ("true" "false")) | ||
53 | ("nosep" ("true" "false")) | ||
54 | ) | ||
55 | "Local options.") | ||
56 | |||
57 | (defvar LaTeX-ekdosis-rdg-options | ||
58 | '(;; | ||
59 | ("wit") | ||
60 | ("alt") | ||
61 | ("pre") | ||
62 | ("post") | ||
63 | ("prewit") | ||
64 | ("postwit") | ||
65 | ("nordg" ("true" "false")) | ||
66 | ) | ||
67 | "Local options.") | ||
68 | |||
69 | (defvar LaTeX-ekdosis-note-options | ||
70 | '(;; | ||
71 | ("type") | ||
72 | ("lem") | ||
73 | ("labelb") | ||
74 | ("labele") | ||
75 | ("sep") | ||
76 | ("pre") | ||
77 | ("post") | ||
78 | ) | ||
79 | "Local options.") | ||
80 | |||
81 | (defvar LaTeX-ekdosis-note-star-options | ||
82 | '(;; | ||
83 | ("pre") | ||
84 | ("post") | ||
85 | ) | ||
86 | "Local options.") | ||
87 | |||
88 | (defvar LaTeX-ekdosis-alignment-key-val-options | ||
89 | '(;; | ||
90 | ("tcols") | ||
91 | ("lcols") | ||
92 | ("texts") | ||
93 | ("apparatus") | ||
94 | ("paired" ("true" "false")) | ||
95 | ("pagelineation" ("true" "false")) | ||
96 | ) | ||
97 | "Local options.") | ||
98 | |||
37 | (TeX-add-style-hook | 99 | (TeX-add-style-hook |
38 | "ekdosis" | 100 | "ekdosis" |
39 | (lambda () | 101 | (lambda () |
@@ -53,11 +115,28 @@ | |||
53 | ;; This package relies on lualatex, so check for it: | 115 | ;; This package relies on lualatex, so check for it: |
54 | (TeX-check-engine-add-engines 'luatex) | 116 | (TeX-check-engine-add-engines 'luatex) |
55 | (TeX-add-symbols | 117 | (TeX-add-symbols |
56 | "app" | 118 | '("app" [ (TeX-arg-key-val |
119 | LaTeX-ekdosis-app-options) ] | ||
120 | t) | ||
121 | '("lem" [ (TeX-arg-key-val | ||
122 | LaTeX-ekdosis-lem-options) ] | ||
123 | t) | ||
124 | '("rdg" [ (TeX-arg-key-val | ||
125 | LaTeX-ekdosis-rdg-options) ] | ||
126 | t) | ||
127 | '("note" [ (TeX-arg-key-val | ||
128 | LaTeX-ekdosis-note-options) ] | ||
129 | t) | ||
130 | '("note*" [ (TeX-arg-key-val | ||
131 | LaTeX-ekdosis-note-star-options) ] | ||
132 | t) | ||
133 | '("SetEkdosisAlignment" (TeX-arg-key-val | ||
134 | LaTeX-ekdosis-alignment-key-val-options)) | ||
57 | ) | 135 | ) |
58 | (LaTeX-add-environments | 136 | (LaTeX-add-environments |
59 | "ekdosis" | 137 | "ekdosis" |
60 | ) | 138 | '("alignment" LaTeX-env-args |
139 | [ TeX-arg-key-val LaTeX-ekdosis-alignment-key-val-options ] 0)) | ||
61 | ) | 140 | ) |
62 | LaTeX-dialect) | 141 | LaTeX-dialect) |
63 | 142 | ||