Move config local to Dodge

src/Dodge/Event/Keyboard.hs

@@ -5,11 +5,12 @@ module Dodge.Event.Keyboard
 import Dodge.Data
 import Dodge.Base
 import Dodge.CreatureAction
+import Dodge.LoadConfig
+
 import SDL
 import Data.Maybe
 import qualified Data.Set as S
 import Control.Lens
-import LoadConfig
 
 handleKeyboardEvent :: KeyboardEventData -> World -> Maybe World
 handleKeyboardEvent kev w = case keyboardEventKeyMotion kev of
@@ -50,4 +51,4 @@ pauseGame :: World -> World
 pauseGame w = w {_menuState = PauseMenu}
 
 toggleMap w = w & carteDisplay %~ not
-escapeMap w = w & carteDisplay .~ False
+escapeMap w = w & carteDisplay .~ False