Using persona to validate emails

1 files changed, 22 insertions, 0 deletions

diff --git a/src/client/elm/Native/Reads.js b/src/client/elm/Native/Reads.js
new file mode 100644
index 0000000..5785aed
--- /dev/null
+++ b/src/client/elm/Native/Reads.js
@@ -0,0 +1,22 @@
+Elm.Native.Reads = {};
+Elm.Native.Reads.make = function(localRuntime) {
+
+  localRuntime.Native = localRuntime.Native || {};
+  localRuntime.Native.Reads = localRuntime.Native.Reads || {};
+  if(localRuntime.Native.Reads.values) {
+    return localRuntime.Native.Reads.values;
+  }
+
+  var Maybe = Elm.Maybe.make(localRuntime);
+
+  function readInt(str) {
+    var number = Number(str);
+    return isNaN(number) || str === ''
+             ? Maybe.Nothing
+             : Maybe.Just(number);
+  }
+
+  return localRuntime.Native.Reads.values = {
+    readInt: readInt
+  };
+};