From 5f93b65403f06505f729b8336a0da8e7b46fe67c Mon Sep 17 00:00:00 2001
From: Marijn Haverbeke <marijn@haverbeke.nl>
Date: Sun, 2 Oct 2016 12:11:40 +0200
Subject: [PATCH] [haskell mode] Make sure unfinished strings have token type
string
To make closebrackets work with this mode
Closes #4277
---
mode/haskell/haskell.js | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/mode/haskell/haskell.js b/mode/haskell/haskell.js
index fe0bab67..4197666a 100644
--- a/mode/haskell/haskell.js
+++ b/mode/haskell/haskell.js
@@ -56,7 +56,7 @@ CodeMirror.defineMode("haskell", function(_config, modeConfig) {
if (source.eat('\'')) {
return "string";
}
- return "error";
+ return "string error";
}
if (ch == '"') {
@@ -166,7 +166,7 @@ CodeMirror.defineMode("haskell", function(_config, modeConfig) {
}
}
setState(normal);
- return "error";
+ return "string error";
}
function stringGap(source, setState) {
@@ -194,7 +194,7 @@ CodeMirror.defineMode("haskell", function(_config, modeConfig) {
"module", "newtype", "of", "then", "type", "where", "_");
setType("keyword")(
- "\.\.", ":", "::", "=", "\\", "\"", "<-", "->", "@", "~", "=>");
+ "\.\.", ":", "::", "=", "\\", "<-", "->", "@", "~", "=>");
setType("builtin")(
"!!", "$!", "$", "&&", "+", "++", "-", ".", "/", "/=", "<", "<=", "=<<",
--
GitLab