Upgrade to elm 0.17.1

1 files changed, 0 insertions, 44 deletions

diff --git a/src/Model/Edition/Edition.elm b/src/Model/Edition/Edition.elm
deleted file mode 100644
index 9a28253..0000000
--- a/src/Model/Edition/Edition.elm
+++ /dev/null
@@ -1,44 +0,0 @@
-module Model.Edition.Edition
-  ( Edition
-  , Kind(..)
-  , newEdition
-  , keyCodeToChar
-  , isEmpty
-  ) where
-
-import Keyboard exposing (KeyCode)
-import String
-
-import Model.Id exposing (..)
-import Model.Edition.NameEdition as NameEdition
-import Model.Edition.TimeEdition as TimeEdition
-
-type alias Edition =
-  { id : Id
-  , kind : Kind
-  , chars : List Char
-  }
-
-type Kind =
-  Name
-  | Time
-
-newEdition id kind =
-  { id = id
-  , kind = kind
-  , chars = []
-  }
-
-keyCodeToChar : Kind -> KeyCode -> Maybe Char
-keyCodeToChar kind =
-  case kind of
-    Name -> NameEdition.keyCodeToChar
-    Time -> TimeEdition.keyCodeToChar
-
-isEmpty : Edition -> Bool
-isEmpty edition =
-  edition.chars
-    |> String.fromList
-    |> String.trim
-    |> String.length
-    |> (==) 0