Add no weapon start

src/Dodge/Room/Teleport.hs

@@ -28,7 +28,7 @@ telRoomLev i = do
     h <- state $ randomR (200,300)
     return $ roomRectAutoLinks w h & rmPS .~ 
         [ PS (w/2,h/2) 0 $ PutPressPlate telPP 
-        , PS (w/2,h/2+ 30) 0 $ putLamp
+        , PS (w/2,h/2+ 30) 0 putLamp
         ]
   where
     telPP = PressPlate