Commit 5001f21c authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski

[version] small cpt refactoring

parent f7253342
......@@ -136,7 +136,7 @@ nodeMainSpanCpt = here.component "nodeMainSpan" cpt
) currentTasks'
)
, if nodeType == GT.NodeUser
then GV.versionView {session}
then GV.versionView { session } []
else H.div {} []
, if showBox then
......
......@@ -31,8 +31,8 @@ type VersionProps =
session :: Sessions.Session
)
versionView :: Record VersionProps -> R.Element
versionView props = R.createElement versionCpt props []
versionView :: R2.Component VersionProps
versionView = R.createElement versionCpt
versionCpt :: R.Component VersionProps
versionCpt = here.component "version" cpt
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment