Prepare for some persistence

2021-11-11 22:08:46 +02:00
parent b73c4cfd1b
commit a788a188fe
9 changed files with 132 additions and 15 deletions
--- a/FeedMonad-demo/app/Main.hs
+++ b/FeedMonad-demo/app/Main.hs
@@ -3,7 +3,14 @@ module Main where

 import FeedMonad
 import Data.Category
+import Data.Entry (URL(URL))
+
+myFeeds :: [ Category URL ]
+myFeeds =
+  [ Category "News"
+    [ Leaf (URL "https://github.com/feediron/feediron-recipes/commits/master.atom")]
+  ]

 main :: IO ()
 main = do
-  defaultMain defaultConfig{feeds = [ Category "News" [] ]}
+  defaultMain defaultConfig{feeds = myFeeds }