Commit e6480d6b authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski

[bootstrap v4] fix for codimd iframe size

parent 5ddf1bee
......@@ -104,8 +104,9 @@ frameLayoutViewCpt :: R.Component ViewProps
frameLayoutViewCpt = R.hooksComponentWithModule thisModule "frameLayoutView" cpt
where
cpt {frame: (NodePoly {hyperdata: Hyperdata {base, frame_id}}), nodeId, reload, session, nodeType} _ = do
pure $ H.div { className : "frame" }
[ H.iframe { src: hframeUrl nodeType base frame_id
pure $ R2.frameset { className : "frame"
, rows: "100%,*" }
[ R2.frame { src: hframeUrl nodeType base frame_id
, width: "100%"
, height: "100%"
} []
......
......@@ -115,6 +115,12 @@ select = createDOM "select"
menu :: ElemFactory
menu = createDOM "menu"
frame :: ElemFactory
frame = createDOM "frame"
frameset :: ElemFactory
frameset = createDOM "frameset"
keyCode :: forall event. event -> Effect Int
keyCode = runEffectFn1 _keyCode
......
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