From: <de...@de...> - 2006-08-27 04:25:19
|
Author: RafaelAlvarez Date: 2006-08-26 19:11:03 -0500 (Sat, 26 Aug 2006) New Revision: 11376 Modified: twiki/branches/TWikiRelease04x00/lib/TWiki/Configure/Checkers/cygwin.pm Log: Item2819: Added missing quote. The item is still open, though Modified: twiki/branches/TWikiRelease04x00/lib/TWiki/Configure/Checkers/cygwin.pm =================================================================== --- twiki/branches/TWikiRelease04x00/lib/TWiki/Configure/Checkers/cygwin.pm 2006-08-25 15:26:52 UTC (rev 11375) +++ twiki/branches/TWikiRelease04x00/lib/TWiki/Configure/Checkers/cygwin.pm 2006-08-27 00:11:03 UTC (rev 11376) @@ -1,14 +1,14 @@ -sub check { - # Get Cygwin perl's package version number - my $pkg = `perl -v; - if ($?) { - return TWiki::Configure::Checker::WARN(<<HERE); -Cannot identify perl package version - cygcheck or grep not installed -HERE - } else { - $pkg = (split ' ', $pkg)[1]; # Package version - return $pkg; - } -} - -1; +sub check { + # Get Cygwin perl's package version number + my $pkg = `perl -v`; + if ($?) { + return TWiki::Configure::Checker::WARN(<<HERE); +Cannot identify perl package version - cygcheck or grep not installed +HERE + } else { + $pkg = (split ' ', $pkg)[1]; # Package version + return $pkg; + } +} + +1; |