--- parser3/tests/065.html 2012/05/24 12:27:14 1.6
+++ parser3/tests/065.html 2024/12/28 15:42:43 1.8
@@ -5,6 +5,9 @@ $selffilespec[$filespec]
@main[]
$tRepl[^table::create[nameless]{$request:document-root ^$request:document-root}]
+uri: $request:uri
+path: $request:path
+
^do[]
^do[$selffilespec]
^do[/a/some.tar.gz]
@@ -28,6 +31,10 @@ $tRepl[^table::create[nameless]{$request
^do[C:\temp/file.txt]
^do[C:/temp\file.txt]
+^do[^file::create[text;/../;]]
+^do[^file::create[text;/path/name.ext;]]
+^file:fullpath[^file::create[text;/path/name.ext;]]
+^try-catch{^file:fullpath{code}}
@do[sFileSpec]
src=^printFS[$sFileSpec]
@@ -39,4 +46,4 @@ justext=^file:justext[$sFileSpec]
@printFS[sFileSpec]
-$result[^sFileSpec.replace[$tRepl]]
+$result[^if($sFileSpec is file){$sFileSpec.name}{^sFileSpec.replace[$tRepl]}]