diff options
author | Robert Alessi <alessi@robertalessi.net> | 2018-08-28 12:43:19 +0200 |
---|---|---|
committer | Robert Alessi <alessi@robertalessi.net> | 2018-08-28 12:43:19 +0200 |
commit | 251d753e51b64bdfda0bae01ef205758843506dc (patch) | |
tree | 979c55e3c50a23b2e7dacc12de864900ba608893 | |
parent | 48adb3422af6b1c51c948c5627b8e49da85f60c0 (diff) | |
download | arabluatex-251d753e51b64bdfda0bae01ef205758843506dc.tar.gz |
more refined AUCTeX style file
-rw-r--r-- | arabluatex.el | 22 |
1 files changed, 16 insertions, 6 deletions
diff --git a/arabluatex.el b/arabluatex.el index 1acf59b..d8e8dff 100644 --- a/arabluatex.el +++ b/arabluatex.el | |||
@@ -21,10 +21,20 @@ | |||
21 | ;; along with this program. If not, see | 21 | ;; along with this program. If not, see |
22 | ;; <http://www.gnu.org/licenses/>. | 22 | ;; <http://www.gnu.org/licenses/>. |
23 | 23 | ||
24 | (defvar LaTeX-arabluatex-package-options | 24 | (defvar LaTeX-arabluatex-preamble-options |
25 | '("voc" "fullvoc" "novoc" "trans" "export") | 25 | '(;; |
26 | ("voc") | ||
27 | ("fullvoc") | ||
28 | ("novoc") | ||
29 | ("trans") | ||
30 | ("export" ("true" "false"))) | ||
26 | "Package options for the arabluatex package.") | 31 | "Package options for the arabluatex package.") |
27 | 32 | ||
33 | (defun LaTeX-arabluatex-package-options () | ||
34 | "Prompt for package options for arabluatex package." | ||
35 | (TeX-read-key-val t | ||
36 | (append LaTeX-arabluatex-preamble-options))) | ||
37 | |||
28 | (defvar LaTeX-arabluatex-mode-options | 38 | (defvar LaTeX-arabluatex-mode-options |
29 | '(;; | 39 | '(;; |
30 | ("voc") | 40 | ("voc") |
@@ -43,7 +53,7 @@ | |||
43 | ("color") | 53 | ("color") |
44 | ("delim" ("true" "false")) | 54 | ("delim" ("true" "false")) |
45 | ("utf" ("true" "false")) | 55 | ("utf" ("true" "false")) |
46 | ("export")) | 56 | ("export" ("true" "false"))) |
47 | "Key=value options for arabverse environment.") | 57 | "Key=value options for arabverse environment.") |
48 | 58 | ||
49 | (defvar LaTeX-arabluatex-color-options | 59 | (defvar LaTeX-arabluatex-color-options |
@@ -51,13 +61,13 @@ | |||
51 | 61 | ||
52 | (defvar LaTeX-arabluatex-outfile-options | 62 | (defvar LaTeX-arabluatex-outfile-options |
53 | '(;; | 63 | '(;; |
54 | (newline)) | 64 | ("newline")) |
55 | "Option for outfile command.") | 65 | "Option for outfile command.") |
56 | 66 | ||
57 | (defvar LaTeX-arabluatex-arbmark-options | 67 | (defvar LaTeX-arabluatex-arbmark-options |
58 | '(;; | 68 | '(;; |
59 | (rl) | 69 | ("rl") |
60 | (lr)) | 70 | ("lr")) |
61 | "Option for arbmark command.") | 71 | "Option for arbmark command.") |
62 | 72 | ||
63 | (TeX-add-style-hook | 73 | (TeX-add-style-hook |