Broken commit (removed loadKeyConfig)

2021-08-27 11:58:11 +01:00
parent c4df048d31
commit 3ff04576ab
25 changed files with 122 additions and 200 deletions
@@ -65,7 +65,7 @@ addSoundToDoor i pld hwd (x:ys) = f x : ys
      where
        g dm w 
            | dist wp pld > 2 && dist wp hwd > 2 
-                        = soundFrom (WallSound i) (fromIntegral doorSound) 1 0 $ dm w
+                        = soundFrom (WallSound i) doorSound 1 0 $ dm w
            | otherwise = dm w
          where 
            wp = snd $ _wlLine (_walls w IM.! i)