@@ -68,6 +68,7 @@ module Internal.Model exposing
68 , getWidth
68 , getWidth
69 , gridClass
69 , gridClass
70 , htmlClass
70 , htmlClass
71 , lengthClassName
72 , lengthClassName
@@ -110,7 +111,6 @@ module Internal.Model exposing
110 , untransformed
111 , untransformed
111 , unwrapDecorations
112 , unwrapDecorations
112 , unwrapDecsHelper
113 , unwrapDecsHelper
@@ -330,7 +330,6 @@ unstyled =
330 Unstyled << always
330 Unstyled << always
334finalizeNode has node attributes children embedMode parentContext =
333finalizeNode has node attributes children embedMode parentContext =
336 createNode nodeName attrs =
335 createNode nodeName attrs =
@@ -1448,13 +1447,6 @@ untransformed =
1448 Untransformed
1447 Untransformed
1453−-- VirtualDom.text " "
1458createElement : LayoutContext -> Children (Element msg) -> Gathered msg -> Element msg
1450createElement : LayoutContext -> Children (Element msg) -> Gathered msg -> Element msg
1459createElement context children rendered =
1451createElement context children rendered =
@@ -1621,7 +1613,14 @@ createElement context children rendered =
1621 (finalizeNode rendered.has
1613 (finalizeNode rendered.has
1622 rendered.node
1614 rendered.node
1623 rendered.attributes
1615 rendered.attributes
1624− (Keyed <| List.map (\x -> ( "nearby-elements-pls", x )) rendered.children ++ keyed)
1620+ ( "nearby-elements-pls", x )
1625 NoStyleSheet
1624 NoStyleSheet
@@ -1629,7 +1628,19 @@ createElement context children rendered =
1630 { styles = allStyles
1629 { styles = allStyles
1631 , html =
1630 , html =
1632− finalizeNode rendered.has rendered.node rendered.attributes (Keyed (List.map (\x -> ( "nearby-elements-pls", x )) rendered.children ++ keyed))
1631+ finalizeNode
1634+ rendered.attributes
1639+ ( "nearby-elements-pls", x )
1635 Unkeyed unkeyedChildren ->
1646 Unkeyed unkeyedChildren ->
@@ -1646,17 +1657,23 @@ createElement context children rendered =
1646 case newStyles of
1657 case newStyles of
1648 Unstyled
1659 Unstyled
1649− (finalizeNode rendered.has
1660+ (finalizeNode
1650 rendered.node
1662 rendered.node
1651 rendered.attributes
1663 rendered.attributes
1652− (Unkeyed <| rendered.children ++ unkeyed)
1664+ (Unkeyed <| unkeyed ++ rendered.children)
1653 NoStyleSheet
1665 NoStyleSheet
1656 allStyles ->
1668 allStyles ->
1658 { styles = allStyles
1670 { styles = allStyles
1659− , html = finalizeNode rendered.has rendered.node rendered.attributes (Unkeyed (rendered.children ++ unkeyed))
1671+ , html =
1675+ rendered.attributes
1676+ (Unkeyed (unkeyed ++ rendered.children))