diff options
| author | Yitzchak Scott-Thoennes <sthoenna@efn.org> | 2004-11-02 09:24:29 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-11-03 07:39:04 +0000 |
| commit | 546cd220972dafe91724980b525f77bf080c60b2 (patch) | |
| tree | 35323819afaa01b2d3abc0d7e2a3933040cde857 | |
| parent | 81aa54e6a925ccb45b7cc335e1ceb6706382d0a8 (diff) | |
| download | perl-546cd220972dafe91724980b525f77bf080c60b2.tar.gz | |
Re: [perl #30633] Perl's "do" operator with a variety of absolute paths under Cygwin
Message-ID: <20041103012429.GA7196@efn.org>
p4raw-id: //depot/perl@23468
| -rw-r--r-- | util.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -16,7 +16,7 @@ && (isALNUM((f)[1]) || strchr("$-_]>",(f)[1]))))) #else /* !VMS */ -# ifdef WIN32 +# if defined(WIN32) || defined(__CYGWIN__) # define PERL_FILE_IS_ABSOLUTE(f) \ (*(f) == '/' || *(f) == '\\' /* UNC/rooted path */ \ || ((f)[0] && (f)[1] == ':')) /* drive name */ |