Merge branch 'master' of gitosis@localhost:L-seed
authorJoachim Breitner <mail@joachim-breitner.de>
Fri, 26 Jun 2009 23:09:15 +0000 (01:09 +0200)
committerJoachim Breitner <mail@joachim-breitner.de>
Fri, 26 Jun 2009 23:09:15 +0000 (01:09 +0200)
src/Lseed/Mainloop.hs

index 46f0b14..9b61cb8 100644 (file)
@@ -53,7 +53,7 @@ lseedMainLoop rt obs gardenSource maxDays = do
                                let tickDiff = timeSpanFraction tickLength tickStart later
                                    dayDiff = (fromIntegral tickOfDay + tickDiff) /
                                              fromIntegral ticksPerDay
-                                   timeInfo = formatTimeInfo day dayDiff ++ " Connect now! http://lseed.gpn.entropia.de/"
+                                   timeInfo = formatTimeInfo day dayDiff ++ " -- Connect now! http://lseed.gpn.entropia.de/ -- Changes auf http://entropia.de/wiki/L-seed"
                                    visualizeAngle = lightAngle dayDiff
                                    gardenNow = annotateGarden visualizeAngle $ 
                                                growingGarden tickDiff