summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorGravatar Julian Squires <julian@cipht.net>2015-05-05 14:03:06 -0400
committerGravatar Julian Squires <julian@cipht.net>2015-05-05 14:03:06 -0400
commite5aa4b8a9c693b390ca372eb21a0265b0a7dc9e6 (patch)
treed6c030357542336db507cfe1a1637d566f18bd1b /src
parent494b3eab2b761352274d5ae0700fbf92995689f3 (diff)
Treat "style" as starting an expression in urweb-mode
Diffstat (limited to 'src')
-rw-r--r--src/elisp/urweb-defs.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/elisp/urweb-defs.el b/src/elisp/urweb-defs.el
index 8054d829..1b21cba0 100644
--- a/src/elisp/urweb-defs.el
+++ b/src/elisp/urweb-defs.el
@@ -108,7 +108,7 @@ notion of \"the end of an outline\".")
"datatype" "type" "open" "include"
urweb-module-head-syms
"con" "map" "where" "extern" "constraint" "constraints"
- "table" "sequence" "class" "cookie" "task" "policy")
+ "table" "sequence" "class" "cookie" "style" "task" "policy")
"Symbols starting an sexp.")
;; (defconst urweb-not-arg-start-re
@@ -135,7 +135,7 @@ notion of \"the end of an outline\".")
(("case" "datatype" "if" "then" "else"
"let" "open" "sig" "struct" "type" "val"
"con" "constraint" "table" "sequence" "class" "cookie"
- "task" "policy")))))
+ "style" "task" "policy")))))
(defconst urweb-starters-indent-after
(urweb-syms-re "let" "in" "struct" "sig")
@@ -190,7 +190,7 @@ for all symbols and in all lines starting with the given symbol."
'("datatype" "fun"
"open" "type" "val" "and"
"con" "constraint" "table" "sequence" "class" "cookie"
- "task" "policy"))
+ "style" "task" "policy"))
"The starters of new expressions.")
(defconst urweb-exptrail-syms