--- parser3/src/www/htdocs/Attic/index.html	2001/03/24 09:44:21	1.44
+++ parser3/src/www/htdocs/Attic/index.html	2001/03/24 19:55:34	1.52
@@ -1,10 +1,17 @@
-@main[]
+@auto[]
+$html-typo[^table:set{user	html
+_	&nbsp^;
+&lt^;&lt^;	&laquo^;
+&gt^;&gt^;	&raquo^;
+}]
 
+@main[]
+^taint[html-typo;<<]<HR>
 $t[^table:load[/test.cfg]]
 ^process[@b[]
 f
 ]
-^b[]
+^b[]<BR>
 
 ^$t.a=$t.a<BR>
 
@@ -30,13 +37,13 @@ $response:location[http://parser3/123]
 ^$request:uri=$request:uri<BR>
 
 <form method=post>
-(^$form:name=$form:name)<BR>
-<input name=name value="^default[$form:name;не знаю]">
+<table border=1 width=250><tr><td>$form:name</td></tr></table>
+<textarea name=name rows=5 cols=40>^untaint[html]{^default[$form:name;не знаю]}</textarea><BR>
 <input type=submit>
 </form>
 
 @default[test;def]
-^if(^test.length[]){$test}{$def}
+$result[^if(^test.length[]){$test}{$def}]
 
 @exception[origin;source;comment;type;code]
 <body bgcolor=black>
@@ -49,5 +56,5 @@ ${comment}.
 
 @auto_test[]
 ^BASE.auto_test[]
-<li>$request:uri<BR>
+<li>$request:uri
 
