Mailing-List: contact cygwin-help AT cygwin DOT com; run by ezmlm
List-Subscribe: <mailto:cygwin-subscribe AT cygwin DOT com>
List-Archive: <http://sources.redhat.com/ml/cygwin/>
List-Post: <mailto:cygwin AT cygwin DOT com>
List-Help: <mailto:cygwin-help AT cygwin DOT com>, <http://sources.redhat.com/ml/#faqs>
Sender: cygwin-owner AT cygwin DOT com
Mail-Followup-To: cygwin AT cygwin DOT com
Delivered-To: mailing list cygwin AT cygwin DOT com
From: "linda w \(cyg\)" <cygwin AT tlinx DOT org>
To: <cygwin AT cygwin DOT com>
Subject: Perl pathname parsing, File::Spec, proposed fix
Date: Mon, 30 Dec 2002 18:18:43 -0800
Message-ID: <000701c2b072$f0bcf1b0$1403a8c0@sc.tlinx.org>
MIME-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3 (Normal)
X-MSMail-Priority: Normal
Importance: Normal
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
In-Reply-To: <000201c2af0b$6d810bf0$1403a8c0@sc.tlinx.org>


Does anyone see a problem with the following proposed change in the
Perl lib dir?

It seems the Win32 handles both forward and backward slashes and
no special module for Cygwin is needed.

Linda


--- File/Spec.pm        2001-08-21 17:16:14.000000000 -0700
+++ File/Spec.pm        2002-12-30 18:08:50.000000000 -0800
@@ -9,7 +9,8 @@
              MSWin32 => 'Win32',
              os2     => 'OS2',
              VMS     => 'VMS',
-             epoc    => 'Epoc');
+             epoc    => 'Epoc',
+             cygwin  => 'Win32');

 my $module = $module{$^O} || 'Unix';



--
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple
Bug reporting:         http://cygwin.com/bugs.html
Documentation:         http://cygwin.com/docs.html
FAQ:                   http://cygwin.com/faq/