This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix unixify when beginning with current directory.
authorCraig A. Berry <craigberry@mac.com>
Tue, 5 May 2015 02:25:05 +0000 (21:25 -0500)
committerCraig A. Berry <craigberry@mac.com>
Wed, 6 May 2015 23:51:22 +0000 (18:51 -0500)
commitf401ac158eb0a92eccfb544c5b7589a6bf8404a6
tree1076bae47e89db9105bb80258d68642400de5957
parentabdf340104c29dbd310ff3e2102fb061a7a1f925
Fix unixify when beginning with current directory.

VMS::Filespec::unixify has been truncating its return value and
returning early when the input begins with [] meaning the current
directory.  If there was nothing else, we've been getting the right
answer:

    [] --> ./

but if there was a file portion of the name it's been getting
omitted:

    []foo.txt --> ./

which is now fixed.  Looks like it's been broken since inception
in 5.002, though only with the specific [] case and not if there
was an explicit device or directory name.
ext/VMS-Filespec/t/filespec.t
vms/vms.c