branch: externals/a68-mode
commit 5881861eb13d3710f190e056a46bba5bca731984
Author: Omar Polo <o...@omarpolo.com>
Commit: Omar Polo <o...@omarpolo.com>

    fmt
---
 a68-mode.el | 33 +++++++++++++++++----------------
 1 file changed, 17 insertions(+), 16 deletions(-)

diff --git a/a68-mode.el b/a68-mode.el
index cac23cfd6a..85f259d596 100644
--- a/a68-mode.el
+++ b/a68-mode.el
@@ -216,22 +216,23 @@
   (setq-local comment-start a68-comment-style)
   (setq-local comment-end a68-comment-style)
   (setq-local syntax-propertize-function
-              (syntax-propertize-rules ((rx (group bow "COMMENT" eow)
-                                            (group (*? anychar))
-                                            (group bow "COMMENT" eow))
-                                        (1 "<")
-                                        (3 ">"))
-                                       ((rx (group bow "CO" eow)
-                                            (group (*? anychar))
-                                            (group bow "CO" eow))
-                                        (1 "<")
-                                        (3 ">"))
-                                       ;; ((rx (group "#")
-                                       ;;      (group (*? anychar))
-                                       ;;      (group "#"))
-                                       ;;  (1 "<")
-                                       ;;  (3 ">"))
-                                       )))
+              (syntax-propertize-rules
+               ((rx (group bow "COMMENT" eow)
+                    (group (*? anychar))
+                    (group bow "COMMENT" eow))
+                (1 "<")
+                (3 ">"))
+               ((rx (group bow "CO" eow)
+                    (group (*? anychar))
+                    (group bow "CO" eow))
+                (1 "<")
+                (3 ">"))
+               ;; ((rx (group "#\\[^!\\]")
+               ;;      (group (*? anychar))
+               ;;      (group "#"))
+               ;;  (1 "<")
+               ;;  (3 ">"))
+               )))
 
 ;;;###autoload
 (add-to-list 'auto-mode-alist '("\\.a68\\'" . a68-mode))

Reply via email to