diff --git a/app/inspektoratpracy.hs b/app/inspektoratpracy.hs
index 42c62d2..0e32591 100644
--- a/app/inspektoratpracy.hs
+++ b/app/inspektoratpracy.hs
@@ -13,15 +13,15 @@ import Text.Printf
 extractRecords = extractLinksWithText "//td/a[contains(@href,'.pdf')]"
 
 toShadowItem :: (String, String) -> ShadowItem
-toShadowItem (url, title) =
+toShadowItem (url, monthlytitle) =
   (defaultShadowItem url title) {
     originalDate = Just date,
     itype = "periodical",
     format = Just "pdf",
     finalUrl = url
     }
-  where title = "title"
-        date = getDate $ replace "%20" " " url
+    where title = (replace "\r" "" (replace "\n" "" (replace "\t" "" monthlytitle)))
+          date = getDate $ replace "%20" " " url
 
 getDate :: String -> String
 getDate url = date where