aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Utils/Form.elm
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/Utils/Form.elm')
-rw-r--r--src/client/elm/Utils/Form.elm8
1 files changed, 0 insertions, 8 deletions
diff --git a/src/client/elm/Utils/Form.elm b/src/client/elm/Utils/Form.elm
index 482db5f..8d75a32 100644
--- a/src/client/elm/Utils/Form.elm
+++ b/src/client/elm/Utils/Form.elm
@@ -1,6 +1,5 @@
module Utils.Form exposing
( fieldAsText
- , frequency
)
import Form exposing (Form)
@@ -12,10 +11,3 @@ fieldAsText form field =
Form.getFieldAsString field form
|> .value
|> Maybe.withDefault ""
-
-frequency : Form a b -> Frequency
-frequency form =
- let field = Form.getFieldAsString "frequency" form
- in if field.value == Just (toString Monthly)
- then Monthly
- else Punctual