move door output to verbose
This commit is contained in:
parent
6d051f6c5e
commit
97cdf46170
1 changed files with 3 additions and 3 deletions
|
@ -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
|
||||
|
|
Loading…
Reference in a new issue