Cleanup

src/Dodge/Event.hs

@@ -3,17 +3,17 @@ Module      : Dodge.Event
 Description : Direct event handling
 
 Deals with direct events.
-This includes individual key or mouse presses, but /not/ continuous held down input.
-We cannot handle multiple keys held down at once here,
+This could include individual key or mouse presses.
+However, we cannot handle multiple keys held down at once here,
 (eg left mouse button + right mouse button)
 because these are separate events.
-Instead we store the events in a set, and deal with the combinations in
-"Dodge.Update"; in particular see 'updatePressedButtons'.
+Nor could we handle continuous mouse button input.
+Instead we store button presses (in a Map) and deal with the combinations in
+the simulation step; in particular see 'updatePressedButtons'.
 -}
 module Dodge.Event
     ( handleEvent
     ) where
-import Dodge.Terminal
 import Dodge.InputFocus
 import Dodge.Combine
 import Dodge.Event.Keyboard
@@ -26,13 +26,11 @@ import Dodge.Data
 import Dodge.PreloadData
 --import Dodge.Creature.Action
 import Dodge.Inventory
-import Dodge.Inventory.Add
 import Dodge.SoundLogic
 --import Geometry
 --import Preload.Update
 --import Dodge.FloorItem
 import qualified IntMapHelp           as IM
-import ListHelp
 
 --import Data.Monoid
 import Control.Lens