Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.169 and 1.309

version 1.169, 2001/05/08 06:00:47 version 1.309, 2001/09/11 09:14:04
Line 1 Line 1
 @main[]  @main[]
 ^eval(1<2)  ^testdom4[]
   #^testdom3[]
 $filelist[^table:dir[.]]  #^testdom2[]
 <hr>  #^testdom1[]
 $path[/news/tululu/]  #^testdom0[]
 #^path.flip[]  OK
 <hr>  
 $branches[^table:set{name       val  @testdom4[]
 index.cgihtml   123  $dom[^dom::set[<?xml version="1.0" encoding="windows-1251"?>
 }]  
 $splitURI[^request:uri.lsplit[/]]  <doc>testing проверка ПРОВЕРКА</doc>
                                         ^branches.locate[name;$splitURI.1]  ]]
                                         $branches.name  $response:body[^dom.file[$.encoding[windows-1251]]]
 <HR>  
 $splitURI[^request:uri.lsplit[/]]  @testdom3[]
 $splitURI.0!$splitURI.1  $dom[^dom::load[test.xml]]
 <HR>  $dom[^dom.xslt[test.xsl;$.param1(48)]]
   $dom[^dom.xslt[test.xsl;$.param1(48)]]
 $t2[^table:set{dir      title  
 /here   Here  @testdom2[]
 }]  $dom[^dom::load[test.xml]]
 $t2{^menu{${dir}-$title}[,]}  #^dom.save[$.encoding[windows-1251];write.xml]
 <HR>  #^dom.save[;write.xml]
 $dir[news]  ^dom.save[$.encoding[windows-1251] $.method[xml];write.xml]
 $list[^table:dir[$dir]]  ^dom.save[$.encoding[windows-1251] $.method[html];write.html]
 ^list.menu{  ^dom.save[$.encoding[windows-1251] $.method[text];write.txt]
     $subdir[$dir/$list.name]  
         $sublist[^table:dir[$subdir]]  @testdom1[]
         ${list.name}/ $sublist{^menu{$name}[,]}<br>  $dom[^dom::load[test.xml]]
 }  $dom[^dom.xslt[test.xsl;$.param1(48)]]
 <HR>  $response:body[^dom.file[$.encoding[windows-1251]]]
 ^t[x]  
 <HR>  @testdom0[]
 ^if(in "/otherdeeper"){y;n}  $dom[^dom::load[test.xml]]
 <HR>  ^dom.save[$.encoding[windows-1251];write.xml]
 ^$form:проверка_имя=$form:проверка_имя<BR>  ^dom.string[$.encoding[windows-1251]]
 <form method=post>  $файл[^dom.file[$.encoding[windows-1251]]]
 <input name=проверка_имя value=проверка_значение>  ^файл.save[binary;writefile.xml]
 <input type=submit>  $response:body[$файл]
 </form>  OK
 <HR>  
   
 ^^table:dir[/]:<BR>  
 $d[^table:dir[/]]  
 $d{^menu{$name &nbsp^;&nbsp^;&nbsp^;&nbsp^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}}  
 <HR>  
   
 $files[^table:set{name}]  
 $d{^menu{  
     ^if(-d "$name"){  
         ^:files.append{$name}  
     }  
 }}  
   
 $files{^menu{$name}[,]}  
 <HR>  
   
 @exception[origin;source;comment;type;code][i;j]  
 <body bgcolor=black>  
 <font color=white>  
 ERROR:  
 ^if(def $source){$origin '$source'}  
 ${comment}.  
 ^if(def $type){type=$type}  
 ^if(def $code){code=$code}  
   
 @auto_test[]  
 ^BASE.auto_test[]  
 <li>${request:uri}!  
   
 @t[a]  
 -${a}-  
 @end  
   
   

Removed from v.1.169  
changed lines
  Added in v.1.309


E-mail: