Move config local to Dodge

2021-03-27 00:34:14 +01:00
parent d603ef549d
commit 32376022cc
10 changed files with 160 additions and 184 deletions
@@ -7,6 +7,7 @@ import Dodge.CreatureAction
 import Dodge.Update.UsingInput
 import Dodge.Event
 import Dodge.CreatureState
+import Dodge.LoadConfig

 import Geometry

@@ -18,7 +19,6 @@ import System.Random

 import Data.Maybe

-import LoadConfig

 yourControl :: World -> (World -> World,StdGen) -> Creature -> ((World -> World,StdGen), Maybe Creature)
 yourControl w (f,g) cr = ( (updateUsingInput . f, g)