diff --git a/ruby_event_store-browser/elm/src/Main.elm b/ruby_event_store-browser/elm/src/Main.elm index e16338dc37..9a30b2e120 100644 --- a/ruby_event_store-browser/elm/src/Main.elm +++ b/ruby_event_store-browser/elm/src/Main.elm @@ -165,18 +165,14 @@ view model = Just flags -> let - ( maybePageTitle, pageContent ) = + ( title, content ) = viewPage model.page + + wrappedModel = + WrappedModel model.layout model.key flags in - { body = - [ div [] - [ Layout.view - GotLayoutMsg - (WrappedModel model.layout model.key flags) - pageContent - ] - ] - , title = fullTitle maybePageTitle + { title = fullTitle title + , body = [ div [] [ Layout.view GotLayoutMsg wrappedModel content ] ] }