]> gitweb @ CieloNegro.org - Rakka.git/blobdiff - Rakka/Resource/PageEntity.hs
clean up rakka-page-1.0.rng
[Rakka.git] / Rakka / Resource / PageEntity.hs
index 09b5ecd367caa2ab24569f595447070f98d45f7b..8f4bd9caced4f263c09be86f1f02d6bfbcaf953c 100644 (file)
@@ -134,7 +134,7 @@ entityToXHTML env
                  += sattr "xmlns" "http://www.w3.org/1999/xhtml"
                  += ( getXPathTreesInDoc "/page/@lang"
                       `guards`
-                      qattr (QN "xml" "lang" "")
+                      qattr (mkQName "xml" "lang" "")
                                 ( getXPathTreesInDoc "/page/@lang/text()" )
                     )
                  += ( eelem "head"