Merge pull request #63 from luigy/fix-clear-mount-node
clear mount node before attaching a widget
commit3fb1b382d8880a81db082dd04c4f9294862ff9c2
authorRyan Trinkle <ryan.trinkle@gmail.com>
dateWed 8 Jun 2016, 16:51 (10 years ago)
parent7543c4a814a03f
src/Reflex/Dom/Internal.hs+1
@@ -68,6 +68,7 @@ attachWidget' :: DOM.IsElement e => e -> WebViewSingleton x -> Widget x a -> IO
6868attachWidget' rootElement wv w = do
6969 Just doc <- getOwnerDocument rootElement
7070 events <- newChan
71+ setInnerHTML rootElement $ Just (""::String)
7172 (result, fc@(FireCommand fire)) <- runSpiderHost $ do
7273 (postBuild, postBuildTriggerRef) <- newEventWithTriggerRef
7374 let builderEnv = ImmediateDomBuilderEnv