diff --git a/affection.cabal b/affection.cabal index dfeec64..378b5c5 100644 --- a/affection.cabal +++ b/affection.cabal @@ -68,10 +68,8 @@ library , Affection.Logging , Affection.Types , Affection.StateMachine - , Affection.MouseInteractable , Affection.Util , Affection.MessageBus - , Affection.MessageBus.Util , Affection.MessageBus.Class , Affection.MessageBus.Message , Affection.MessageBus.Message.Class diff --git a/src/Affection/Logging.hs b/src/Affection/Logging.hs index e64ed7c..f18b30e 100644 --- a/src/Affection/Logging.hs +++ b/src/Affection/Logging.hs @@ -1,7 +1,7 @@ {-# 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". +module Affection.Logging where import Debug.Trace diff --git a/src/Affection/MessageBus/Message/JoystickMessage.hs b/src/Affection/MessageBus/Message/JoystickMessage.hs index eb5c0e2..645f4d3 100644 --- a/src/Affection/MessageBus/Message/JoystickMessage.hs +++ b/src/Affection/MessageBus/Message/JoystickMessage.hs @@ -21,7 +21,7 @@ import qualified SDL 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 = MsgJoystickAxis -- ^ Movement of a Joystick axis { msgJAWhen :: Double -- ^ Time of event