--- parser3/src/www/htdocs/Attic/index.html 2001/03/22 11:19:17 1.34 +++ parser3/src/www/htdocs/Attic/index.html 2001/05/08 06:07:51 1.170 @@ -1,20 +1,75 @@ @main[] -^$root_test=$root_test !
-^$site_test=$site_test !
-${cookie:н}? +^OP:eval(1<2) +$filelist[^table:dir[.]] +
+$path[/news/tululu/] +#^path.flip[] +
+$branches[^table:set{name val +index.cgihtml 123 +}] +$splitURI[^request:uri.lsplit[/]] + ^branches.locate[name;$splitURI.1] + $branches.name +
+$splitURI[^request:uri.lsplit[/]] +$splitURI.0!$splitURI.1 +
+ +$t2[^table:set{dir title +/here Here +}] +$t2{^menu{${dir}-$title}[,]} +
+$dir[news] +$list[^table:dir[$dir]] +^list.menu{ + $subdir[$dir/$list.name] + $sublist[^table:dir[$subdir]] + ${list.name}/ $sublist{^menu{$name}[,]}
+} +
+^t[x] +
+^if(in "/otherdeeper"){y;n} +
+^$form:проверка_имя=$form:проверка_имя
-(^$form:name=$form:name)
- +
+
+ +^^table:dir[/]:
+$d[^table:dir[/]] +$d{^menu{$name  ^; ^; ^; ^;^if(-f $name){-f} ^if(-d $name){-d};
}} +
+ +$files[^table:set{name}] +$d{^menu{ + ^if(-d "$name"){ + ^:files.append{$name} + } +}} -@default[test;def] -^if(^test.length[]){$test}{$def} +$files{^menu{$name}[,]} +
-@exception[origin;source;comment;type;code] +@exception[origin;source;comment;type;code][i;j] + + ERROR: ^if(def $source){$origin '$source'} ${comment}. ^if(def $type){type=$type} ^if(def $code){code=$code} + +@auto_test[] +^BASE.auto_test[] +
  • ${request:uri}! + +@t[a] +-${a}- +@end +