diff options
| author | Joris | 2016-01-02 19:07:19 +0100 |
|---|---|---|
| committer | Joris | 2016-01-02 19:07:19 +0100 |
| commit | bb316286b0859b5648c61f44c88399f4c1aad9cd (patch) | |
| tree | ecbe401c1ff657987b6609997a69775969a317f7 /src/client/elm/Persona.elm | |
| parent | 0d0c99fd28b782c7daf02fb5cc48d3eb252e705d (diff) | |
| download | budget-bb316286b0859b5648c61f44c88399f4c1aad9cd.tar.gz budget-bb316286b0859b5648c61f44c88399f4c1aad9cd.tar.bz2 budget-bb316286b0859b5648c61f44c88399f4c1aad9cd.zip | |
Use start-app for elm
Diffstat (limited to 'src/client/elm/Persona.elm')
| -rw-r--r-- | src/client/elm/Persona.elm | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/src/client/elm/Persona.elm b/src/client/elm/Persona.elm index e55d1b2..d5e1d6a 100644 --- a/src/client/elm/Persona.elm +++ b/src/client/elm/Persona.elm @@ -1,8 +1,6 @@ module Persona ( Operation(..) , operations - , fromString - , toString ) where type Operation = @@ -11,15 +9,3 @@ type Operation = operations : Signal.Mailbox Operation operations = Signal.mailbox NoOp - -fromString : String -> Operation -fromString str = - case str of - "SignIn" -> SignIn - _ -> NoOp - -toString : Operation -> String -toString operation = - case operation of - SignIn -> "SignIn" - _ -> "NoOp" |