diff options
Diffstat (limited to '')
| -rw-r--r-- | picarones-elm/src/Main.elm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/picarones-elm/src/Main.elm b/picarones-elm/src/Main.elm index 014d2f4..6e69fe4 100644 --- a/picarones-elm/src/Main.elm +++ b/picarones-elm/src/Main.elm @@ -36,7 +36,7 @@ type alias Model = { slide : Int, max : Int, prefix : String } -- start at the first slide, for now just assume that we have ten slides init : (String, Int) -> (Model, Cmd Msg) -init (url, max) = ( { slide = 0, max = max, prefix = url ++ "/"}, Cmd.none) +init (url, max) = ( { slide = 0, max = max, prefix = url}, Cmd.none) -- possible state transitions: type Msg = GotMessage String @@ -102,7 +102,7 @@ padNum l num = view : Model -> Browser.Document Msg -view model = { title = "Websockets example" +view model = { title = "Picarones" , body = [body model] } |