     H{ } clone :> classes
     body [
         dup xml-chunk? [
-            seq>> [ tag? ] filter
-            "span" "div" [ deep-tags-named ] bi-curry@ bi append
-            [
+            seq>> [
                 dup {
+                    [ tag? ]
                     [ "style" attr ]
                     [ "class" attr not ]
                 } 1&& [

                    "style" over delete-at* drop classes css-class
                    "class" rot set-at
                ] [ drop ] if
            ] each
        ] [ drop ] if
    ] each classes sort-values css-classes body ;


    "conventions" >link topic>filename
    [XML
        <div class="navbar">
        <a href="http://factorcode.org">factorcode.org</a>
        <a href="/">Handbook</a>
        <a href=<->>Glossary</a>
        <form method="get" action="/search" style="display:inline;">
            <input placeholder="Search" name="search" type="text"/>
