aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJosh Rahm <rahm@google.com>2021-11-02 00:53:16 -0600
committerJosh Rahm <rahm@google.com>2021-11-02 00:53:16 -0600
commitbc641331a060a8bd4941b1854a08a97b3700fe6c (patch)
treec7c8980b5372cf8ca3c435131601bc838423ef8b /src
parent0d13796f6cb360ec8c00bf84651d68df5a108a33 (diff)
downloadrde-bc641331a060a8bd4941b1854a08a97b3700fe6c.tar.gz
rde-bc641331a060a8bd4941b1854a08a97b3700fe6c.tar.bz2
rde-bc641331a060a8bd4941b1854a08a97b3700fe6c.zip
Changed how titles are parsed.
Diffstat (limited to 'src')
-rw-r--r--src/Main.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 7e1cc68..195c151 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -92,5 +92,6 @@ main = do
splitOnAll arr str = splitOnAll' arr [str]
splitOnAll' [] str = str
- splitOnAll' (a:as) str = splitOnAll' as (concatMap (splitOn a) str)
+ splitOnAll' (a:as) [str] = splitOnAll' as (splitOn a str)
+ splitOnAll' _ lst = lst