removed unneeded code
This commit is contained in:
parent
d6804f95fb
commit
8785405420
1 changed files with 0 additions and 1 deletions
|
@ -125,7 +125,6 @@ reloadOnR _ _ = return ()
|
||||||
|
|
||||||
reload :: UserData -> Affection ()
|
reload :: UserData -> Affection ()
|
||||||
reload ud = do
|
reload ud = do
|
||||||
now <- getElapsedTime
|
|
||||||
randList <- liftIO $ mapM (\_ -> randomRIO (0,1)) [0..3599]
|
randList <- liftIO $ mapM (\_ -> randomRIO (0,1)) [0..3599]
|
||||||
let fullMatrix = fromList 60 60 randList
|
let fullMatrix = fromList 60 60 randList
|
||||||
void $ liftIO $ swapMVar (lifeMat ud) fullMatrix
|
void $ liftIO $ swapMVar (lifeMat ud) fullMatrix
|
||||||
|
|
Loading…
Reference in a new issue