@@ 19,7 19,7 @@ sectionLabel :: [String] -> String
sectionLabel = intercalate " | " . reverse . ("jackkelly.name":)
slug :: String -> String
-slug = filter (not . (`elem` ("',!?()+:\"" :: String)))
+slug = filter (not . (`elem` ("`',!?()+:\"" :: String)))
. replace "&./ " '_'
. map toLower
where