From ba40f6cdc7d92283e29021eff116e2e51f1c9f28 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 30 Apr 2017 14:28:23 -0400
Subject: - Added <|. to syntax highlights. - Fixed an indentation bug for
 "with-" macros.

---
 lux-mode/lux-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lux-mode/lux-mode.el b/lux-mode/lux-mode.el
index bce620ee9..0dc38676d 100644
--- a/lux-mode/lux-mode.el
+++ b/lux-mode/lux-mode.el
@@ -219,7 +219,7 @@ Called by `imenu--generic-function'."
             "function" "case" ":" ":!" ":!!" "undefined" "ident-for"
             "and" "or"
             "exec" "let" "let%" "if" "cond" "do" "be" "open" "loop" "recur" "comment" "list" "list&" "io" "vector" "tree"
-            "get@" "set@" "update@" "|>" "|>." "<|" "_$" "$_" "~" "~@" "~'" "::" ":::" "default"
+            "get@" "set@" "update@" "|>" "|>." "<|" "<|." "_$" "$_" "~" "~@" "~'" "::" ":::" "default"
             "|" "&" "->" "All" "Ex" "Rec" "host" "$" "type"
             "^" "^or" "^slots" "^=>" "^~" "^@" "^template" "^open" "^|>" "^stream&" "^regex"
             "bin" "oct" "hex"
@@ -340,7 +340,7 @@ This function also returns nil meaning don't specify the indentation."
               ((or (eq method 'defun)
                    (and (null method)
                         (> (length function) 3)
-                        (string-match "\\`\\(?:\\S +/\\)?\\(\\w+:\\|with-\\)"
+                        (string-match "\\`\\(?:\\S +/\\)?\\(\\w+:\\|\\(\\w+;\\)?with-\\)"
                                       function)))
                (lisp-indent-defform state indent-point))
               ((integerp method)
-- 
cgit v1.2.3