Do not run forever (rather use bash for that)
authorJoachim Breitner <mail@joachim-breitner.de>
Fri, 26 Jun 2009 21:43:33 +0000 (23:43 +0200)
committerJoachim Breitner <mail@joachim-breitner.de>
Fri, 26 Jun 2009 21:47:20 +0000 (23:47 +0200)
src/dbclient.hs

index 18ee852..48e4eca 100644 (file)
@@ -54,7 +54,7 @@ main = do
        case args of
          [conf] -> do
                obs <- cairoObserver
-               forever $ lseedMainLoop True
+               lseedMainLoop True
                              (obs `mappend` scoringObs conf)
                              (GardenSource (getDBGarden conf) (getDBUpdate conf))
                              30