summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJustin Bedo <cu@cua0.org>2024-10-15 07:25:03 +1100
committerJustin Bedo <cu@cua0.org>2024-10-15 07:25:07 +1100
commitf4b680d0376395b06a758c054894c4ab9211fe12 (patch)
treedcdcba3b24698fc89ffa5e612e8b1359c1bf1ed8
parente8444eff07a089aeae588b5b4dccbf1f499db786 (diff)
remove . from expansion search
-rw-r--r--jterm.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/jterm.hs b/jterm.hs
index e492959..c089e35 100644
--- a/jterm.hs
+++ b/jterm.hs
@@ -61,7 +61,7 @@ expandAround rp p =
where
l = R.length rp
- ws x = x `elem` [" ", "\t", "(", ")", "[", "]", "{", "}", "\n", "'", "\"", ".", ",", ";", ":"]
+ ws x = x `elem` [" ", "\t", "(", ")", "[", "]", "{", "}", "\n", "'", "\"", ",", ";", ":"]
getc i
| i == 0 = let (sel, _) = R.splitAt 1 rp in R.toText sel