From bb316286b0859b5648c61f44c88399f4c1aad9cd Mon Sep 17 00:00:00 2001
From: Joris
Date: Sat, 2 Jan 2016 19:07:19 +0100
Subject: Use start-app for elm

---
 src/client/elm/Persona.elm | 14 --------------
 1 file changed, 14 deletions(-)

(limited to 'src/client/elm/Persona.elm')

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"
-- 
cgit v1.2.3