diff --git a/app/otwarteczasopismauam.hs b/app/otwarteczasopismauam.hs index 2b2d5c9..a921e0a 100644 --- a/app/otwarteczasopismauam.hs +++ b/app/otwarteczasopismauam.hs @@ -16,8 +16,8 @@ extractRecords = extractLinksWithText "//h3[@class='media-heading']/a" >>> first (arr (++"/issue/archive")) >>> first (extractLinksWithText "//*[@class='media-heading']/a" >>> first (extractLinksWithText "//*[@class='media-heading']/a" - >>> first (extractLinks "//div[@class='download']/a"))) - + >>> first (extractLinks "//div[@class='download']/a" + >>> extractLinks "//a[@class='download']"))) toShadowItem :: (((String, String), String), String) -> ShadowItem toShadowItem (((url, articleTitle), yearlyTitle), journalTitle) =