diff options
author | Craig A. Berry <craigberry@mac.com> | 2005-12-14 22:03:28 +0000 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2005-12-14 22:03:28 +0000 |
commit | 4e061adcc69dd69844b385b8dfdd652ca0783660 (patch) | |
tree | 46eb247531818b7b79ab0a0e39ff71fe04174217 /vms | |
parent | 0740f80f71de6af2dd0e3c3aecddec0fc42f34f0 (diff) | |
download | perl-4e061adcc69dd69844b385b8dfdd652ca0783660.tar.gz |
Using the system's utime() requires a patch to vms/vmsish.h
that has not been submitted yet.
p4raw-id: //depot/perl@26358
Diffstat (limited to 'vms')
-rw-r--r-- | vms/vms.c | 7 |
1 files changed, 0 insertions, 7 deletions
@@ -9260,12 +9260,6 @@ Perl_my_localtime(pTHX_ const time_t *timep) static const long int utime_baseadjust[2] = { 0x4beb4000, 0x7c9567 }; /*{{{int my_utime(const char *path, const struct utimbuf *utimes)*/ -#if __CRTL_VER >= 70300000 && !defined(__VAX) -int Perl_my_utime(pTHX_ const char *file, const struct utimbuf *utimes) -{ - return utime(file, utimes); -} -#else int Perl_my_utime(pTHX_ const char *file, const struct utimbuf *utimes) { register int i; @@ -9418,7 +9412,6 @@ int Perl_my_utime(pTHX_ const char *file, const struct utimbuf *utimes) return 0; } /* end of my_utime() */ -#endif /*}}}*/ /* |