more cleanup

This commit is contained in:
nek0 2018-09-25 16:10:36 +02:00
parent c804a2e013
commit 937535057c
3 changed files with 3 additions and 5 deletions

View file

@ -68,10 +68,8 @@ library
, Affection.Logging , Affection.Logging
, Affection.Types , Affection.Types
, Affection.StateMachine , Affection.StateMachine
, Affection.MouseInteractable
, Affection.Util , Affection.Util
, Affection.MessageBus , Affection.MessageBus
, Affection.MessageBus.Util
, Affection.MessageBus.Class , Affection.MessageBus.Class
, Affection.MessageBus.Message , Affection.MessageBus.Message
, Affection.MessageBus.Message.Class , Affection.MessageBus.Message.Class

View file

@ -1,7 +1,7 @@
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
module Affection.Logging where -- | This module defines the logging capability of Affection, whis is derived
-- ^ This module defines the logging capability of Affection, whis is derived
-- from "Debug.Trace". -- from "Debug.Trace".
module Affection.Logging where
import Debug.Trace import Debug.Trace

View file

@ -21,7 +21,7 @@ import qualified SDL
import Linear (V2(..)) import Linear (V2(..))
-- Datatype for handling all possible joystick events handed over from sdl2 -- | Datatype for handling all possible joystick events handed over from sdl2
data JoystickMessage data JoystickMessage
= MsgJoystickAxis -- ^ Movement of a Joystick axis = MsgJoystickAxis -- ^ Movement of a Joystick axis
{ msgJAWhen :: Double -- ^ Time of event { msgJAWhen :: Double -- ^ Time of event