declutter output

This commit is contained in:
nek0 2018-04-27 23:34:57 +02:00
parent 6308a110b8
commit f6860c1332

View file

@ -154,7 +154,7 @@ updateNPCs imgmat rp dt =
ntargeti <- randomRIO (0, length seekRP - 1) ntargeti <- randomRIO (0, length seekRP - 1)
let ntarget = pointCoord (seekRP !! ntargeti) let ntarget = pointCoord (seekRP !! ntargeti)
path = astarAppl imgmat ntarget pos' path = astarAppl imgmat ntarget pos'
logIO A.Debug ("seeking path from " ++ show pos' ++ " to " ++ show ntarget) logIO A.Verbose ("seeking path from " ++ show pos' ++ " to " ++ show ntarget)
case path of case path of
Nothing -> getPath pos' Nothing -> getPath pos'
Just p -> return p Just p -> return p