diff options
| author | Craig A. Berry <craigberry@mac.com> | 2009-06-04 10:29:57 -0500 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2009-06-04 10:29:57 -0500 |
| commit | 50255d58c0706bb8dc18d9013e1541619334546f (patch) | |
| tree | 13018d28c84a845ffd68659542d447a2a41abffd /vms/ext | |
| parent | 8415bfe009d4d13c8d970b3e09ff685cfe5dc0d2 (diff) | |
| download | perl-50255d58c0706bb8dc18d9013e1541619334546f.tar.gz | |
Test case to go with 30e682852bf42358156ed62e06e91f75e9f5b807.
We should be able to depend on SYS$SCRATCH being a non-rooted
logical name.
Diffstat (limited to 'vms/ext')
| -rw-r--r-- | vms/ext/filespec.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/vms/ext/filespec.t b/vms/ext/filespec.t index 11b6698116..5dd27c9b9d 100644 --- a/vms/ext/filespec.t +++ b/vms/ext/filespec.t @@ -156,6 +156,7 @@ __down_:[__the_.__garden_.__path_...] unixpath /__down_/__the_/__garden_ __down_/__the_/__garden_/__path_ vmspath [.__down_.__the_.__garden_.__path_] ^ __path_ vmspath [.__path_] ^ / vmspath sys$disk:[000000] ^* +/sys$scratch vmspath sys$scratch: ^ # Redundant characters in Unix paths //__some_/__where_//__over_/../__the_.__rainbow_ vmsify __some_:[__where_]__the_.__rainbow_ __some_:[__where_.__over_.-]__the_.__rainbow_ |