From 97cdf4617031f410a2714a3bb10754fcd6c2121a Mon Sep 17 00:00:00 2001 From: nek0 Date: Sun, 31 Mar 2019 05:28:19 +0200 Subject: [PATCH] move door output to verbose --- src/Object/Door.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Object/Door.hs b/src/Object/Door.hs index 8669627..a2dd745 100644 --- a/src/Object/Door.hs +++ b/src/Object/Door.hs @@ -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