diff options
Diffstat (limited to 'pkgs/profpatsch/youtube2audiopodcast/Main.hs')
-rwxr-xr-x | pkgs/profpatsch/youtube2audiopodcast/Main.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/pkgs/profpatsch/youtube2audiopodcast/Main.hs b/pkgs/profpatsch/youtube2audiopodcast/Main.hs index 98be3867..4d0f9a93 100755 --- a/pkgs/profpatsch/youtube2audiopodcast/Main.hs +++ b/pkgs/profpatsch/youtube2audiopodcast/Main.hs @@ -5,6 +5,7 @@ module Main where import Data.Text (Text) +import Data.Text.Lazy.IO as TIO import Text.RSS.Syntax import Text.Feed.Types (Feed(RSSFeed)) import Text.Feed.Export (textFeed) @@ -68,7 +69,8 @@ main = do { channelName = "channel name" , channelURL = "channel url" }) - print $ textFeed $ RSSFeed $ toRSS exConfig rss + let (Just feed) = textFeed $ RSSFeed $ toRSS exConfig rss + TIO.putStr feed toRSS :: Config -> Channel -> RSS toRSS Config{..} Channel{channelInfo, channelItems} = |