aboutsummaryrefslogtreecommitdiff
path: root/lux-mode
diff options
context:
space:
mode:
Diffstat (limited to 'lux-mode')
-rw-r--r--lux-mode/lux-mode.el13
1 files changed, 7 insertions, 6 deletions
diff --git a/lux-mode/lux-mode.el b/lux-mode/lux-mode.el
index 98844d106..a98a7a472 100644
--- a/lux-mode/lux-mode.el
+++ b/lux-mode/lux-mode.el
@@ -91,10 +91,10 @@ Otherwise check `define-lux-indent' and `put-lux-indent'."
(let ((table (make-syntax-table)))
(modify-syntax-entry ?\( "()" table)
(modify-syntax-entry ?\) ")(" table)
- (modify-syntax-entry ?\[ "(]" table)
- (modify-syntax-entry ?\] ")[" table)
(modify-syntax-entry ?\{ "(}" table)
(modify-syntax-entry ?\} "){" table)
+ (modify-syntax-entry ?\[ "(]" table)
+ (modify-syntax-entry ?\] ")[" table)
(modify-syntax-entry ?\" "\"\"" table)
(modify-syntax-entry ?\s "-" table)
(modify-syntax-entry ?\t "-" table)
@@ -142,9 +142,10 @@ ENDP and DELIM."
(if (derived-mode-p 'lux-mode)
(save-excursion
(backward-char)
- (if (and (or (char-equal delim ?\()
- (char-equal delim ?\")
- (char-equal delim ?{))
+ (if (and (or (char-equal delim ?\")
+ (char-equal delim ?\()
+ (char-equal delim ?\{)
+ (char-equal delim ?\[))
(not endp))
(if (char-equal (char-after) ?#)
(and (not (bobp))
@@ -543,7 +544,7 @@ This function also returns nil meaning don't specify the indentation."
(last
(split-string (substring-no-properties function) "\\.")))))
(setq method (get (intern-soft function-tail) 'lux-indent-function))
- (cond ((member (char-after open-paren) '(?\[ ?\{))
+ (cond ((member (char-after open-paren) '(?\{ ?\[))
(goto-char open-paren)
(1+ (current-column)))
((or (eq method 'defun)