astro/tracer
astro
/
tracer
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

move door output to verbose

This commit is contained in:
Nek0 - 2019-03-31 05:28:19 +02:00
parent 6d051f6c5e
commit 97cdf46170
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Object/Door.hs
View File

@ -75,11 +75,11 @@ doorObjectTransition t@ObjDoor s _ ent (Just aent) = do
dir <- query rot
oclear <- query clearanceLvl
mttl <- queryMaybe objStateTime
liftIO $ A.logIO A.Debug (show aent ++ " is attempting to open door " ++ show ent)
liftIO $ A.logIO A.Debug ("door clearance: " ++ show oclear ++ ", entity clearance: " ++ show clearance)
liftIO $ A.logIO A.Verbose (show aent ++ " is attempting to open door " ++ show ent)
-- liftIO $ A.logIO A.Debug ("door clearance: " ++ show oclear ++ ", entity clearance: " ++ show clearance)
if clearance >= oclear
then do
liftIO $ A.logIO A.Debug ("door " ++ show oclear ++ " opens")
liftIO $ A.logIO A.Verbose ("door " ++ show ent ++ " opens")
let nstat = AnimState
(AnimId AnimDoor0 "open" dir)
0