From e0b6a24c013cb0a4d8732e3419c5b75ac2655cac Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Pawe=C5=82=20Pacana?= Date: Thu, 21 Mar 2024 22:48:48 +0100 Subject: [PATCH] Format Page.Debug --- .../elm/src/Page/Debug.elm | 22 +++++++++++-------- 1 file changed, 13 insertions(+), 9 deletions(-) diff --git a/ruby_event_store-browser/elm/src/Page/Debug.elm b/ruby_event_store-browser/elm/src/Page/Debug.elm index 016d8e4926..c5cf926cdc 100644 --- a/ruby_event_store-browser/elm/src/Page/Debug.elm +++ b/ruby_event_store-browser/elm/src/Page/Debug.elm @@ -1,17 +1,21 @@ module Page.Debug exposing (..) -import Html exposing (..) import Flags exposing (Flags) +import Html exposing (..) + + +type alias Model = + { resVersion : String, repositoryAdapter : String } -type alias Model = { resVersion : String, repositoryAdapter : String } init : Flags -> Model -init flags = - { resVersion = flags.resVersion, repositoryAdapter = flags.repositoryAdapter } +init flags = + { resVersion = flags.resVersion, repositoryAdapter = flags.repositoryAdapter } + -view: Model -> Html a +view : Model -> Html a view model = - div [] [ - p [] [text ("RubyEventStore version: " ++ model.resVersion)], - p [] [text ("RubyEventStore adapter: " ++ model.repositoryAdapter)] - ] + div [] + [ p [] [ text ("RubyEventStore version: " ++ model.resVersion) ] + , p [] [ text ("RubyEventStore adapter: " ++ model.repositoryAdapter) ] + ]