diff options
author | Craig A. Berry <craigberry@mac.com> | 2015-02-16 19:14:30 -0600 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2015-02-16 19:16:14 -0600 |
commit | ad5889a4c2db1f8199252797cd45acf44dc547ae (patch) | |
tree | 1cb5cdec1f285898cdb6c53db2a4d5bb0626fb03 /vms | |
parent | 8e0a272fbda1da989d682dceeee7f5e8dee38a7b (diff) | |
download | perl-ad5889a4c2db1f8199252797cd45acf44dc547ae.tar.gz |
Remove dead function from vms/vms.c
fix_bare_dirnames is not used anywhere and doesn't actually do
anything. It appears to be a placeholder for something that has
not materialized in the 10 years of it existence, so time to tidy
up.
Diffstat (limited to 'vms')
-rw-r--r-- | vms/vms.c | 14 |
1 files changed, 0 insertions, 14 deletions
@@ -1781,20 +1781,6 @@ static char *mp_do_rmsexpand(pTHX_ const char *, char *, int, const char *, unsi static char *mp_do_fileify_dirspec(pTHX_ const char *, char *, int, int *); static char *mp_do_tovmsspec(pTHX_ const char *, char *, int, int, int *); -/* fixup barenames that are directories for internal use. - * There have been problems with the consistent handling of UNIX - * style directory names when routines are presented with a name that - * has no directory delimiters at all. So this routine will eventually - * fix the issue. - */ -static char * fixup_bare_dirnames(const char * name) -{ - if (decc_disable_to_vms_logname_translation) { -/* fix me */ - } - return NULL; -} - /* 8.3, remove() is now broken on symbolic links */ static int rms_erase(const char * vmsname); |