Date selection and callback

RawToast · Mar 30, 2018 · f6efa94 · f6efa94
1 parent e27fe66
commit f6efa94
Show file tree

Hide file tree

Showing 3 changed files with 23 additions and 10 deletions.
diff --git a/dokusho/package.json b/dokusho/package.json
@@ -13,14 +13,13 @@
   },
   "scripts": {
     "start": "react-scripts start",
-    "build": "toolbox react-scripts build",
+    "build": "react-toolbox-themr react-scripts build",
     "test": "react-scripts test --env=jsdom",
     "coverage": "react-scripts test --env=jsdom --coverage",
     "ci": "react-scripts test --env=jsdom --coverage && cat ./coverage/lcov.info | ./node_modules/coveralls/bin/coveralls.js",
     "eject": "react-scripts eject",
     "prepare": "npm link bs-platform",
-    "clean": "rm -rf lib && rm -rf node_modules",
-    "toolbox": "react-toolbox-themr"
+    "clean": "rm -rf lib && rm -rf node_modules"
   },
   "devDependencies": {
     "@astrada/reason-react-toolbox": "^0.4.2",

diff --git a/dokusho/src/app/DateSelector.re b/dokusho/src/app/DateSelector.re
@@ -1,9 +1,23 @@
-let component = ReasonReact.statelessComponent("DateSelector");
+let component = ReasonReact.reducerComponent("DateSelector");
 
-let make = (~today: string, _children) => {
+let getDate = Js.Date.make;
+
+let make = (~onChangeSelect, _children) => {
   ...component,
-  render: (_) =>
-    <div> 
-        <ReactToolbox.DatePicker label="Today"/> 
-    </div>
+  initialState: () => getDate(),
+  reducer: (state, _ext) => 
+    ReasonReact.Update({ state }),
+  render: (
+      {state, reduce}) =>
+        <div> 
+            <ReactToolbox.DatePicker 
+                label="Date" 
+                value=(`Date(state))
+                onChange=((date, _mouse) =>
+                    {   
+                        onChangeSelect(date);
+                        (reduce(() => { date }))();
+                    }
+                )/> 
+        </div>
 };
diff --git a/dokusho/src/app/Dokusho.re b/dokusho/src/app/Dokusho.re
@@ -43,7 +43,7 @@ module Dokusho {
                 />
               <PageTypeSelection onChangeSelect=(self.reduce(selected => ChangeSelection(selected))) />
 
-              <DateSelector today="" />  
+              <DateSelector onChangeSelect=((a) => ()) />  
 
               <Entries entries=(List.hd(self.state.readingData.days).entries) />