Moved the interface out of the routing config

Author: robertdp

README.md

@@ -6,8 +6,8 @@ A basic pushstate router for React, with support for asynchronous routing logic.
 makeRouter ::
   forall route f.
   Foldable f =>
-  { interface :: PushStateInterface
-  , fallback :: route
+  PushStateInterface ->
+  { fallback :: route
   , parse :: String -> f route
   , print :: route -> String
   , onRoute :: route -> Router route Transitioning Resolved Unit

examples/RoutingDuplex.purs

@@ -42,9 +42,8 @@ makeApp :: Effect (Unit -> JSX)
 makeApp = do
   interface <- PushState.makeInterface
   router <-
-    Router.makeRouter
-      { interface
-      , fallback:
+    Router.makeRouter interface
+      { fallback:
           -- used as the initial route if the parser fails
           NotFound
       , parse: parse routes

generated-docs/md/Wire.React.Router.md

@@ -3,7 +3,7 @@
 #### `makeRouter`
 
 ``` purescript
-makeRouter :: forall f route. Foldable f => { fallback :: route, interface :: PushStateInterface, onRoute :: route -> Router route Transitioning Resolved Unit, parse :: String -> f route, print :: route -> String } -> Effect (Interface route)
+makeRouter :: forall f route. Foldable f => PushStateInterface -> { fallback :: route, onRoute :: route -> Router route Transitioning Resolved Unit, parse :: String -> f route, print :: route -> String } -> Effect (Interface route)
 ```
 
 

src/Router.purs

@@ -31,14 +31,14 @@ type Interface route
 makeRouter ::
   forall f route.
   Foldable f =>
-  { interface :: PushStateInterface
-  , fallback :: route
+  PushStateInterface ->
+  { fallback :: route
   , parse :: String -> f route
   , print :: route -> String
   , onRoute :: route -> Router route Transitioning Resolved Unit
   } ->
   Effect (Interface route)
-makeRouter { interface, fallback, parse, print, onRoute } =
+makeRouter interface { fallback, parse, print, onRoute } =
   let
     onPushState k = PushState.matchesWith parse (\_ -> k) interface