This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
vms fgetname wrapper.
authorJohn Malmberg <wb8tyw@gmail.com>
Mon, 9 Feb 2009 14:50:29 +0000 (08:50 -0600)
committerCraig A. Berry <craigberry@mac.com>
Wed, 11 Feb 2009 14:14:54 +0000 (08:14 -0600)
commitbf8d1304d513f823735f8a2983c62ad285a21568
treee76d9990cba364293e69674623417cb2adef7579
parent8098e75c0be3e52e094306bfbb7c5350f543ee96
vms fgetname wrapper.

fgetname() does not always return the correct Unix format file
specification when the decc$filename_unix_report feature is active and
is ignoring the decc$readdir_dropdot_notype setting.

So always have fgetname() return a VMS format file specification.  When
decc$filename_unix_report is active, use unixify() to convert it to the
expected syntax.

This bug shows up doing rename tests on an open file that has no file
extension with decc$filename_unix_report and decc$readdir_dropdot_notype
both active.

Message-ID: <499042B5.4030803@gmail.com>
vms/vms.c
vms/vmsish.h