added haddock for removePlayer
This commit is contained in:
parent
3a9592f958
commit
fd9e5545f5
1 changed files with 1 additions and 0 deletions
|
@ -109,6 +109,7 @@ setPlayerTick p t tl@(TickLeiste l pl) = TickLeiste (insertPlayerToLeiste p t l'
|
|||
return $ removePlayerFromLeiste p ot l
|
||||
|
||||
-- TODO
|
||||
-- | removes a 'Player' from the 'TickLeiste'
|
||||
removePlayer :: Player -> TickLeiste -> TickLeiste
|
||||
removePlayer p tl@(TickLeiste {leiste = l, player = pm}) = TickLeiste l' pm'
|
||||
where
|
||||
|
|
Loading…
Reference in a new issue