This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl@18752] warnings from CGI tests under cygwin
authorYitzchak Scott-Thoennes <sthoenna@efn.org>
Wed, 19 Feb 2003 13:37:39 +0000 (05:37 -0800)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Tue, 25 Feb 2003 12:12:14 +0000 (12:12 +0000)
Message-ID: <jk/U+gzkg2DE092yn@efn.org>

p4raw-id: //depot/perl@18772

lib/CGI.pm

index 62c41ea..bd9c335 100644 (file)
@@ -149,8 +149,8 @@ $AutoloadClass = $DefaultClass unless defined $CGI::AutoloadClass;
 # The path separator is a slash, backslash or semicolon, depending
 # on the paltform.
 $SL = {
 # The path separator is a slash, backslash or semicolon, depending
 # on the paltform.
 $SL = {
-       UNIX=>'/', OS2=>'\\', EPOC=>'/',
-       WINDOWS=>'\\', DOS=>'\\', MACINTOSH=>':', VMS=>'/'
+    UNIX    => '/',  OS2 => '\\', EPOC      => '/', CYGWIN => '/',
+    WINDOWS => '\\', DOS => '\\', MACINTOSH => ':', VMS    => '/'
     }->{$OS};
 
 # This no longer seems to be necessary
     }->{$OS};
 
 # This no longer seems to be necessary