From 04082c37c3b5af86827cb5054c2e41f53ff43d22 Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Thu, 19 Jan 2023 22:58:22 +0100
Subject: Fix alidist-mode regexes

---
 tw/home/files/emacs-packages/alidist-mode.el | 21 +++++++++++----------
 1 file changed, 11 insertions(+), 10 deletions(-)

(limited to 'tw/home/files/emacs-packages/alidist-mode.el')

diff --git a/tw/home/files/emacs-packages/alidist-mode.el b/tw/home/files/emacs-packages/alidist-mode.el
index 0f264e3b..b5d0e621 100644
--- a/tw/home/files/emacs-packages/alidist-mode.el
+++ b/tw/home/files/emacs-packages/alidist-mode.el
@@ -132,21 +132,22 @@ It is stored in `alidist-mode--mmm-refresh-timer'."
 
 (mmm-add-group
  'alidist-recipe
- '((alidist-main-script
+ `((alidist-main-script
     :submode alidist-script-mode
-    :face mmm-default-submode-face
-    :front (rx line-start "---\n")
-    :back (rx buffer-end))
+    :face default  ; mmm-default-submode-face
+    :front ,(rx line-start "---\n")
+    :back ,(rx buffer-end))
    (alidist-option-script
     :submode alidist-script-mode
-    :face mmm-default-submode-face
+    :face default  ; mmm-default-submode-face
     ;; Any *_recipe key with a multiline string value is probably a script.
-    :front (rx line-start (* whitespace) (1+ (any alnum ?\_)) "_recipe: |\n")
+    :front ,(rx line-start (* whitespace) (1+ (any alnum ?\_))
+                (or "_recipe" "_check") ": |\n")
     ;; End of YAML header, or another YAML key.
-    :back (rx line-start
-              (or "---\n"
-                  (seq (* whitespace) (+ (any alnum ?\_)) ":"
-                       (or line-end whitespace)))))))
+    :back ,(rx line-start
+               (or "---\n"
+                   (seq (* whitespace) (+ (any alnum ?\_)) ":"
+                        (or line-end whitespace)))))))
 
 ;; Make `mmm-mode' remember `sh-mode' indentation variables.
 (cl-dolist (var sh-var-list)
-- 
cgit v1.2.3