Linting, haddocking

2021-04-29 15:31:07 +02:00
parent 750a67ea6e
commit 6a38950501
34 changed files with 506 additions and 441 deletions
@@ -1,22 +1,21 @@
 module Dodge.Creature.YourControl
  where
-
 import Dodge.Data
 import Dodge.Base
 import Dodge.Creature.Action
 import Dodge.Creature.State
 import Dodge.Update.UsingInput
 import Dodge.Config.KeyConfig
-
+import Dodge.Item.Attachment.Data
 import Geometry

 import Control.Lens
 import qualified SDL
+import Data.Maybe
 import qualified Data.Set as S
 import qualified Data.IntMap.Strict as IM
 import System.Random

-import Data.Maybe


 yourControl :: World -> (World -> World,StdGen) -> Creature -> ((World -> World,StdGen), Maybe Creature)