extend toShadowItem method with 'size' parameter

This commit is contained in:
AdamOsiowy123 2022-04-11 10:51:42 +02:00
parent 210b80656e
commit d35c818d4c

View File

@ -29,8 +29,8 @@ extractCustomLinks xpathCondition1 xpathCondition2 xpathCondition3= (downloadDoc
extractRecords = extractCustomLinks "//tr[@class=''] | //tr[@class='_a']" "//td[@cell-header='Nazwa pliku']/a" "//td[@class='size']"
--extractRecords = extractCustomLinks "//td[@cell-header='Nazwa pliku']/a"
toShadowItem :: (String, String) -> ShadowItem
toShadowItem (url, articleTitle) =
toShadowItem :: (String, String, String) -> ShadowItem
toShadowItem (url, size, articleTitle) =
(defaultShadowItem url title) {
originalDate = Just date,
itype = "periodical",