diff --git a/app/ZborBielawa.hs b/app/ZborBielawa.hs
index 3916085..c2463fb 100644
--- a/app/ZborBielawa.hs
+++ b/app/ZborBielawa.hs
@@ -16,7 +16,7 @@ import Debug.Trace
 getLinkAndText xpathCondition = proc doc -> do
   xpathTrees <- getXPathTrees xpathCondition -< doc
   href <- (getXPathTrees "//a" >>> getAttrValue "href") -< xpathTrees
-  txt <- (listA (deep isText >>> getText) >>> arr (intercalate " ")) -< xpathTrees
+  txt <- (deep isText >>> getText) -< xpathTrees
   returnA -< traceShowId (href, txt)