@@ -141,7 +141,7 @@ import Data.Text (Text)
141141import Foreign.JavaScript.Internal.Utils
142142import Foreign.JavaScript.TH
143143import GHCJS.DOM.Document (Document, createDocumentFragment, createElement, createElementNS, createTextNode, createComment)
144−import GHCJS.DOM.Element (getScrollTop, removeAttribute, removeAttributeNS, setAttribute, setAttributeNS, hasAttribute, hasAttributeNS)
144+import GHCJS.DOM.Element (getScrollTop, removeAttribute, removeAttributeNS, setAttribute, setAttributeNS, hasAttribute)
145145import GHCJS.DOM.EventM (EventM, event, on)
146146import GHCJS.DOM.KeyboardEvent as KeyboardEvent
147147import GHCJS.DOM.MouseEvent
@@ -766,15 +766,10 @@ hydrateElement elementTag cfg child = do
766766 let skipAttr = "data-hydration-skip" :: DOM.JSString
767767 ssrAttr = "data-ssr" :: DOM.JSString
768768 shouldSkip :: DOM.Element -> HydrationRunnerT t m Bool
769− shouldSkip e = case cfg ^. namespace of
770− Nothing -> do
771− skip <- hasAttribute e skipAttr
772− ssr <- hasAttribute e ssrAttr
773− pure $ skip || not ssr
774− Just ns -> do
775− skip <- hasAttributeNS e (Just ns) skipAttr
776− ssr <- hasAttributeNS e (Just ns) ssrAttr
777− pure $ skip || not ssr
769+ shouldSkip e = do
770+ skip <- hasAttribute e skipAttr
771+ ssr <- hasAttribute e ssrAttr
772+ pure $ skip || not ssr
778773 childDom <- liftIO $ readIORef childDelayedRef
779774 let rawCfg = extractRawElementConfig cfg
780775 doc <- askDocument