aboutsummaryrefslogtreecommitdiff
path: root/src/parser/haskell/Parser
diff options
context:
space:
mode:
Diffstat (limited to 'src/parser/haskell/Parser')
-rw-r--r--src/parser/haskell/Parser/SeLogerParser.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/parser/haskell/Parser/SeLogerParser.hs b/src/parser/haskell/Parser/SeLogerParser.hs
index dc2a5c2..b073862 100644
--- a/src/parser/haskell/Parser/SeLogerParser.hs
+++ b/src/parser/haskell/Parser/SeLogerParser.hs
@@ -21,4 +21,4 @@ parseAd tags = do
location <- getTagTextAfter "<div class=c-pa-city>" tags
let price = getTagTextAfter "<span class=c-pa-cprice>" tags
url <- getTagAttribute "<a>" "href" tags
- return (Ad name location price (T.concat ["https:", url]))
+ return (Ad name location price url)