Fix bug where corridors blocked passage on 60 degree links

src/Dodge/Creature.hs

@@ -253,7 +253,17 @@ startCr = defaultCreature
     , _crMaxHP = 1500
     , _crInv = IM.fromList (zip [0..20] 
         (
-          [pistol,flameGrenade, teslaGrenade, autoGun,launcher,flameLauncher, poisonLauncher, teslaLauncher, lasGun,grenade
+        [pistol
+        ,blinkGun
+        ,flameGrenade
+        ,teslaGrenade
+        ,autoGun
+        ,launcher
+        ,flameLauncher
+        ,poisonLauncher
+        ,teslaLauncher
+        ,lasGun
+        ,grenade
         ,ltAutoGun,flamer,multGun,spreadGun,remoteLauncher
         ,longGun
         ,hvAutoGun
@@ -263,21 +273,7 @@ startCr = defaultCreature
         ,medkit 50
         ,bezierGun
         ,poisonSprayer
-          ,blinkGun
         ] 
---          [pistol,autoGun,launcher,lasGun,grenade
---          ,ltAutoGun,flamer,multGun,spreadGun,remoteLauncher
---          ,longGun
---          ,hvAutoGun
---          ,teslaGun
---          ,latchkey 0
---          ,miniGun
---          ,medkit 50
---          ,bezierGun
---          ,poisonSprayer
---          ,blinkGun
---          ,frontArmour
---          ] 
           ++ repeat NoItem)) 
          -- startInv
 --                           ([pistol,flameGrenade, teslaGrenade, autoGun,launcher,flameLauncher, poisonLauncher, teslaLauncher, lasGun,grenade

src/Dodge/Rooms.hs

@@ -90,8 +90,8 @@ corridor = Room
     , _rmBound = rectNSWE 50 30 0 40
     }
     where lnks = [((20,70)  ,0)
-                 ,((20,80) +.+ rotateV (0-pi/3) (-20,0),  pi/6)
+                 ,((20,80) +.+ rotateV (0-pi/3) (-10,0),  pi/6)
-                 ,((20,80) +.+ rotateV (  pi/3) ( 20,0),0-pi/6)
+                 ,((20,80) +.+ rotateV (  pi/3) ( 10,0),0-pi/6)
                  ,((20,10)    ,pi)
                  ]
 corridorN :: Room