From: Yitzchak Scott-Thoennes <sthoenna@efn.org>
Date: Wed, 19 Feb 2003 13:37:39 +0000 (-0800)
Subject: [perl@18752] warnings from CGI tests under cygwin
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3292f4263d4135b93f4022a8bad55fc98397b523;p=p5sagit%2Fp5-mst-13.2.git

[perl@18752] warnings from CGI tests under cygwin
Message-ID: <jk/U+gzkg2DE092yn@efn.org>

p4raw-id: //depot/perl@18772
---

diff --git a/lib/CGI.pm b/lib/CGI.pm
index 62c41ea..bd9c335 100644
--- a/lib/CGI.pm
+++ b/lib/CGI.pm
@@ -149,8 +149,8 @@ $AutoloadClass = $DefaultClass unless defined $CGI::AutoloadClass;
 # 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