diff options
| author |  Julian Squires <julian@cipht.net> | 2015-05-05 14:03:06 -0400 |
|---|---|---|
| committer | Julian Squires <julian@cipht.net> | 2015-05-05 14:03:06 -0400 |
| commit | e5aa4b8a9c693b390ca372eb21a0265b0a7dc9e6 (patch) | |
| tree | d6c030357542336db507cfe1a1637d566f18bd1b | |
| parent | 494b3eab2b761352274d5ae0700fbf92995689f3 (diff) | |
Treat "style" as starting an expression in urweb-mode
| -rw-r--r-- | src/elisp/urweb-defs.el | 6 |
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 |