underscore as word separator, fixing #5

hapytex · Jun 17, 2024 · a6158fb · a6158fb
1 parent 3e0e9d8
commit a6158fb
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Text/Slugify.hs b/src/Text/Slugify.hs
@@ -48,6 +48,7 @@ isWordSeparator '\x1d' = True
 isWordSeparator '\x1f' = True
 isWordSeparator '\x1e' = True
 isWordSeparator '\n' = True
+isWordSeparator '_' = True
 isWordSeparator c = case generalCategory c of
     LineSeparator -> True         -- Zl
     ParagraphSeparator -> True    -- Zp