summaryrefslogtreecommitdiff
path: root/src/lspspec.sml
diff options
context:
space:
mode:
Diffstat (limited to 'src/lspspec.sml')
-rw-r--r--src/lspspec.sml4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/lspspec.sml b/src/lspspec.sml
index bbc78606..0d766056 100644
--- a/src/lspspec.sml
+++ b/src/lspspec.sml
@@ -8,9 +8,7 @@ structure LspSpec = struct
(TextIO.output (TextIO.stdErr, str ^ "\n\n"); TextIO.flushOut TextIO.stdErr)
fun trim (s: substring): substring =
- Substring.dropr
- (fn c => c = #" " orelse c = #"\n" orelse c = #"\r")
- (Substring.dropl (fn c => c = #" " orelse c = #"\n" orelse c = #"\r") s)
+ Substring.dropr Char.isSpace (Substring.dropl Char.isSpace s)
fun readHeader (): (string * string) option =
let