This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Trim directory extension in pathify under EFS.
authorCraig A. Berry <craigberry@mac.com>
Sat, 28 Jan 2012 23:05:35 +0000 (17:05 -0600)
committerCraig A. Berry <craigberry@mac.com>
Sat, 28 Jan 2012 23:15:18 +0000 (17:15 -0600)
commitbd1901c67e522749babb4c06e4343629529cdd17
tree7f4bf3a7560fa131bb71e12030ad712a9b1d6cc0
parent21eede782bed11b0263f9bff02b9ca7b7dfcd6eb
Trim directory extension in pathify under EFS.

When Extened Filename Syntax (EFS) is in effect, 1fe570cc5e24ee
changed the age-old behavior of trimming the directory extension
off a directory filename when the path is in Unix syntax.  EFS
really has nothing to do with the necessity to trim .DIR;1 from
the name, so remove the conditional check for EFS from the
existing code.

This gets three more tests passing under EFS in vms/ext/filespec.t.
vms/vms.c