forked from filipg/twilight-library
title formatting fix
This commit is contained in:
parent
cca2ef59d3
commit
78e11f7e70
@ -20,7 +20,7 @@ toShadowItem (url, monthlytitle) =
|
|||||||
format = Just "pdf",
|
format = Just "pdf",
|
||||||
finalUrl = url
|
finalUrl = url
|
||||||
}
|
}
|
||||||
where title = (replace "\r" "" (replace "\n" "" (replace "\t" "" monthlytitle)))
|
where title = "IP" ++ date ++ " " ++ (replace "\r" "" (replace "\n" "" (replace "\t" "" monthlytitle)))
|
||||||
date = getDate $ replace "%20" " " url
|
date = getDate $ replace "%20" " " url
|
||||||
|
|
||||||
getDate :: String -> String
|
getDate :: String -> String
|
||||||
|
Loading…
Reference in New Issue
Block a user