less space
This commit is contained in:
parent
b12667977c
commit
b793cef601
|
@ -45,10 +45,7 @@ update msg model =
|
||||||
(Mi.expectJson ValidateFront Mi.Switch.decoder)
|
(Mi.expectJson ValidateFront Mi.Switch.decoder)
|
||||||
, Mi.request
|
, Mi.request
|
||||||
"GET"
|
"GET"
|
||||||
(Maybe.withDefault
|
(Maybe.withDefault "" model.token)
|
||||||
""
|
|
||||||
model.token
|
|
||||||
)
|
|
||||||
(Mi.Switch.listURL 30 model.switchPage)
|
(Mi.Switch.listURL 30 model.switchPage)
|
||||||
Http.emptyBody
|
Http.emptyBody
|
||||||
(Mi.expectJson ValidateSwitches (Json.Decode.list Mi.Switch.decoder))
|
(Mi.expectJson ValidateSwitches (Json.Decode.list Mi.Switch.decoder))
|
||||||
|
@ -69,10 +66,7 @@ update msg model =
|
||||||
( model
|
( model
|
||||||
, Mi.request
|
, Mi.request
|
||||||
"GET"
|
"GET"
|
||||||
(Maybe.withDefault
|
(Maybe.withDefault "" model.token)
|
||||||
""
|
|
||||||
model.token
|
|
||||||
)
|
|
||||||
(Mi.Switch.listURL 30 model.switchPage)
|
(Mi.Switch.listURL 30 model.switchPage)
|
||||||
Http.emptyBody
|
Http.emptyBody
|
||||||
(Mi.expectJson ValidateSwitches (Json.Decode.list Mi.Switch.decoder))
|
(Mi.expectJson ValidateSwitches (Json.Decode.list Mi.Switch.decoder))
|
||||||
|
|
Loading…
Reference in New Issue