Refactor main function to use a lambda for component

Author: dmjio

client/Main.hs

@@ -12,5 +12,5 @@ foreign export javascript "hs_start" main :: IO ()
 #endif
 -----------------------------------------------------------------------------
 main :: IO ()
-main = run $ miso haskellMisoComponent { logLevel = DebugAll }
+main = run $ miso $ \uri -> (haskellMisoComponent uri) { logLevel = DebugAll }
 -----------------------------------------------------------------------------