diff options
| author | Josh Rahm <rahm@google.com> | 2021-11-02 00:53:16 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-10-09 12:19:45 -0600 |
| commit | cf47b5282be2a62da2aba1a88c8f9599a333b961 (patch) | |
| tree | c7c8980b5372cf8ca3c435131601bc838423ef8b | |
| parent | 17fe2b579f096ab4b3daacaca2db2d5443fd5e92 (diff) | |
| download | rde-cf47b5282be2a62da2aba1a88c8f9599a333b961.tar.gz rde-cf47b5282be2a62da2aba1a88c8f9599a333b961.tar.bz2 rde-cf47b5282be2a62da2aba1a88c8f9599a333b961.zip | |
Changed how titles are parsed.
| -rw-r--r-- | src/Main.hs | 3 |
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 |