Annotation of parser3/tests/065.html, revision 1.6
1.2 paf 1: @auto[filespec]
2: $selffilespec[$filespec]
3:
1.5 misha 4:
1.2 paf 5: @main[]
1.5 misha 6: $tRepl[^table::create[nameless]{$request:document-root ^$request:document-root}]
7:
8: ^do[]
9: ^do[$selffilespec]
10: ^do[/a/some.tar.gz]
1.6 ! misha 11: ^do[/a///some.tar.gz]
! 12: ^do[/a/b///]
! 13: ^do[/a/b///c//]
1.5 misha 14: ^do[/a/b/]
1.6 ! misha 15: ^do[/a/b]
1.5 misha 16: ^do[/a/]
17: ^do[/a]
18: ^do[/]
1.6 ! misha 19: ^do[///]
! 20: ^do[a///]
1.5 misha 21: ^do[/a/file]
22: ^do[/a/dir.zz/file.html]
23: ^do[file]
24: ^do[/a/dir.zz/file]
25: ^do[C:\temp\file.txt]
1.6 ! misha 26: ^do[C:\file.txt]
1.5 misha 27: # slashes mixes
28: ^do[C:\temp/file.txt]
29: ^do[C:/temp\file.txt]
30:
31:
32: @do[sFileSpec]
33: src=^printFS[$sFileSpec]<br />
34: dirname=^printFS[^file:dirname[$sFileSpec]]<br />
35: basename=^file:basename[$sFileSpec]<br />
36: justname=^file:justname[$sFileSpec]<br />
37: justext=^file:justext[$sFileSpec]
38: <hr />
39:
40:
41: @printFS[sFileSpec]
42: $result[^sFileSpec.replace[$tRepl]]
E-mail: