git.iko.soy/rowtype-yoga/psfp
on master help sign in
Und Tschüss!
e569abdMark Eibes
blog/src/components/FillInTheGaps.purs+4−3
compare with master
unifiedsplit
@@ -9,7 +9,7 @@ import Data.Foldable (foldl)
9import Data.Function.Uncurried (mkFn2)
9import Data.Function.Uncurried (mkFn2)
10import Data.Lens ((%~))
10import Data.Lens ((%~))
11import Data.Lens.Index (ix)
11import Data.Lens.Index (ix)
12−import Data.Maybe (Maybe(..), fromMaybe', isJust)
12+import Data.Maybe (Maybe(..), fromMaybe', isJust, isNothing)
13import Data.Monoid (guard)
13import Data.Monoid (guard)
14import Data.String (Pattern(..), split)
14import Data.String (Pattern(..), split)
15import Data.String as S
15import Data.String as S
@@ -29,7 +29,8 @@ import Partial.Unsafe (unsafeCrashWith)
29import React.Basic (JSX, ReactComponent, element, fragment)
29import React.Basic (JSX, ReactComponent, element, fragment)
30import React.Basic.DOM (css)
30import React.Basic.DOM (css)
31import React.Basic.DOM as R
31import React.Basic.DOM as R
32−import React.Basic.Events (handler_)
32+import React.Basic.DOM.Events (preventDefault)
33+import React.Basic.Events (handler, handler_)
33import React.Basic.Helpers (jsx)
34import React.Basic.Helpers (jsx)
34import React.Basic.Hooks (component, useState)
35import React.Basic.Hooks (component, useState)
35import React.Basic.Hooks as React
36import React.Basic.Hooks as React
@@ -189,7 +190,7 @@ mkFillInTheGaps fetch = do
189 [ jsx button
190 [ jsx button
190 { onClick: handler_ onClick
191 { onClick: handler_ onClick
191 , buttonType:
192 , buttonType:
192− if complete segments then
193+ if complete segments && isNothing result then
193 HighlightedButton
194 HighlightedButton
194 else
195 else
195 DisabledButton
196 DisabledButton
blog/src/components/PSLayout.purs+3−1
@@ -21,6 +21,7 @@ import React.Basic.DOM as R
21import React.Basic.Helpers (jsx)
21import React.Basic.Helpers (jsx)
22import React.Basic.Hooks (ReactChildren, component, componentWithChildren, element, reactChildrenToArray)
22import React.Basic.Hooks (ReactChildren, component, componentWithChildren, element, reactChildrenToArray)
23import React.Basic.Hooks as React
23import React.Basic.Hooks as React
24+import Yoga.Box.Component as Box
24import Yoga.CompileEditor.Component (mkCompileEditor)
25import Yoga.CompileEditor.Component (mkCompileEditor)
25import Yoga.Header.Component (mkHeader)
26import Yoga.Header.Component (mkHeader)
26import Yoga.InlineCode.Component as InlineCode
27import Yoga.InlineCode.Component as InlineCode
@@ -90,6 +91,7 @@ mkMdxProviderComponent fetchImpl = do
90 cssBaseline <- mkCssBaseline
91 cssBaseline <- mkCssBaseline
91 editor <- mkCompileEditor fetchImpl
92 editor <- mkCompileEditor fetchImpl
92 fillInTheGaps <- mkFillInTheGaps fetchImpl
93 fillInTheGaps <- mkFillInTheGaps fetchImpl
94+ box <- Box.makeComponent
93 sidebar <- mkSidebar
95 sidebar <- mkSidebar
94 header <- mkHeader
96 header <- mkHeader
95 yogaInlineCode <- InlineCode.makeComponent
97 yogaInlineCode <- InlineCode.makeComponent
@@ -121,7 +123,7 @@ mkMdxProviderComponent fetchImpl = do
121 { children:
123 { children:
122 [ jsx header { className: "" } [ R.text siteInfo.site.siteMetadata.title ]
124 [ jsx header { className: "" } [ R.text siteInfo.site.siteMetadata.title ]
123 , element sidebar { links: siteInfo.site.siteMetadata.menuLinks }
125 , element sidebar { links: siteInfo.site.siteMetadata.menuLinks }
124− , R.div_ (reactChildrenToArray children)
126+ , jsx box {} (reactChildrenToArray children)
125 ]
127 ]
126 }
128 }
127
129