--- parser3/tests/065.html 2003/03/04 11:51:53 1.1.2.1 +++ parser3/tests/065.html 2012/05/24 12:27:14 1.6 @@ -1,9 +1,42 @@ @auto[filespec] $selffilespec[$filespec] + @main[] -#src=$selffilespec
-#dirname=^file:dirname[$selffilespec]
-basename=^file:basename[$selffilespec]
-justname=^file:justname[$selffilespec]
-justext=^file:justext[$selffilespec]
+$tRepl[^table::create[nameless]{$request:document-root ^$request:document-root}] + +^do[] +^do[$selffilespec] +^do[/a/some.tar.gz] +^do[/a///some.tar.gz] +^do[/a/b///] +^do[/a/b///c//] +^do[/a/b/] +^do[/a/b] +^do[/a/] +^do[/a] +^do[/] +^do[///] +^do[a///] +^do[/a/file] +^do[/a/dir.zz/file.html] +^do[file] +^do[/a/dir.zz/file] +^do[C:\temp\file.txt] +^do[C:\file.txt] +# slashes mixes +^do[C:\temp/file.txt] +^do[C:/temp\file.txt] + + +@do[sFileSpec] +src=^printFS[$sFileSpec]
+dirname=^printFS[^file:dirname[$sFileSpec]]
+basename=^file:basename[$sFileSpec]
+justname=^file:justname[$sFileSpec]
+justext=^file:justext[$sFileSpec] +
+ + +@printFS[sFileSpec] +$result[^sFileSpec.replace[$tRepl]]