--- parser3/src/www/htdocs/Attic/index.html	2001/09/20 08:48:35	1.319
+++ parser3/src/www/htdocs/Attic/index.html	2001/09/21 14:46:10	1.328
@@ -1,4 +1,5 @@
 @main[]
+$response:content-type[$.value[text/html] $.charset[windows-1251]]
 ^xslt[]
 OK
 
@@ -15,14 +16,14 @@ $dom[^dom::set{<?xml version="1.0" encod
 </people>
 }]
 
+^show-dom2[$dom]<hr>
 #^show-dnode1[$dom]<hr>
-#^show-dnode2[$dom]<hr>
 $people[^dom.select[*/man]]
 #^show1[]
 ^show-dnodes1[$people]<hr>
 #^people.0.owner.hren[]
 
-#^show-dnode1[^dom.select-single[*/man];0;1]<hr>
+^show-dnode1[^dom.select-single[*/man[2]/name];0;1]<hr>
 
 @show1[]
 ^for[i](0;^people._count[]-1){
@@ -66,3 +67,18 @@ $people[^dom.select[*/man]]
     ^for[l](0;$level-1){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}&lt^;/$dnode.name&gt^;<br>
     }
 }
+
+@show-dom2[dom]
+^dom.save[save.xml;
+#	$.encoding[windows-1251]
+	$.method[xml]
+]
+$file[^dom.file[
+#	$.encoding[windows-1251]
+	$.method[html]
+]]
+^file.save[text;save_file.html]
+^taint[^dom.string[]]
+#	$.encoding[windows-1251]
+#	$.method[xml]
+#]]
\ No newline at end of file