aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Utils
diff options
context:
space:
mode:
authorJoris2016-01-03 23:37:14 +0100
committerJoris2016-01-03 23:46:19 +0100
commitd9df5c3fcffe12aac239b58ccf2fd82c19c3be62 (patch)
treeaee62828e85c9d30e2beb5954062942f0d5d53f4 /src/client/elm/Utils
parentd22d10da342520163014dda255d5d9bd5e1a80c0 (diff)
Validate add payment server side
Diffstat (limited to 'src/client/elm/Utils')
-rw-r--r--src/client/elm/Utils/Validation.elm23
1 files changed, 0 insertions, 23 deletions
diff --git a/src/client/elm/Utils/Validation.elm b/src/client/elm/Utils/Validation.elm
deleted file mode 100644
index b9bccb3..0000000
--- a/src/client/elm/Utils/Validation.elm
+++ /dev/null
@@ -1,23 +0,0 @@
-module Utils.Validation
- ( validateNonEmpty
- , validateNumber
- ) where
-
-import String
-import Reads exposing (readInt)
-
-validateNonEmpty : String -> String -> Result String String
-validateNonEmpty message str =
- if String.isEmpty str
- then Err message
- else Ok str
-
-validateNumber : String -> (Int -> Bool) -> String -> Result String Int
-validateNumber message numberForm str =
- case readInt str of
- Just number ->
- if numberForm number
- then Ok number
- else Err message
- Nothing ->
- Err message