--- parser3/www/htdocs/Attic/_bug.html	2004/02/18 12:55:24	1.3
+++ parser3/www/htdocs/Attic/_bug.html	2004/02/18 13:07:55	1.6
@@ -1,12 +1,15 @@
-@main[]
+@main[]
 $request:charset[UTF-8]
+#$response:charset[UTF-8]
 $response:charset[windows-1251]
-$xdoc[^xdoc::create{<?xml version="1.0"?>
+$response:content-type[$.value[text/html]$.charset[$response:charset]]
+$xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?>
 <doc>
-<br/>
+исходный
 </doc>
 }]
 $xdoc[^xdoc.transform[_bug.xsl]]
 ^xdoc.string[]
+^xdoc.save[_bug.xml;$.encoding[koi8-r]]
 <hr>
 $request:charset/$response:charset
\ No newline at end of file