Merge pull request #9 from slamdata/fix-syntax

Fix syntax that will be an error in PS 0.13

Author: garyb

src/Lunapark/API.purs

@@ -306,8 +306,7 @@ handleLunapark inp = case _ of
     R.liftEffect $ Ref.write ts inp.timeoutsRef
     tryAndCache "set timeouts"
       [ void $ post (inSession : LP.Timeouts : Nil) (LT.encodeTimeouts ts)
-      , do T.for_ (LT.encodeLegacyTimeouts ts) \j →
-           void $ post (inSession : LP.Timeouts : Nil) j
+      , T.for_ (LT.encodeLegacyTimeouts ts) (post (inSession : LP.Timeouts : Nil))
       ]
     pure next
   GoTo uri next → do