Change 11118 by jhi@alpha on 2001/07/03 11:29:54
Subject: [PATCH bleadperl] Bad lishp in change 11084
From: "Philip Newton" <[EMAIL PROTECTED]>
Date: Tue, 3 Jul 2001 09:11:27 +0200
Message-Id: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/lib/FindBin.pm#14 edit
Differences ...
==== //depot/perl/lib/FindBin.pm#14 (text) ====
Index: perl/lib/FindBin.pm
--- perl/lib/FindBin.pm.~1~ Tue Jul 3 05:30:05 2001
+++ perl/lib/FindBin.pm Tue Jul 3 05:30:05 2001
@@ -107,7 +107,7 @@
}
else
{
- my $doshish = ($^O eq 'MSWin32' or $^O eq 'os2');
+ my $dosish = ($^O eq 'MSWin32' or $^O eq 'os2');
unless(($script =~ m#/# || ($dosish && $script =~ m#\\#))
&& -f $script)
{
End of Patch.
