Permalink
Browse files

Fix fails on non-Win32, release 0.85

  • Loading branch information...
1 parent 0b3c0f7 commit 2196c1049cd34fcafaaab7e977c22d179e778c06 @chorny chorny committed Jul 11, 2009
@@ -2,6 +2,9 @@
# Changes for Module::CPANTS::Analyse
#-----------------------------------------------------------------
+0.85 2009-07-12, Alexandr Ciornii
+ - Fix fails on non-Win32
+
0.84 2009-07-08, Alexandr Ciornii
- require Test::Warn 0.11
- add Test::More to deps
@@ -1,6 +1,6 @@
---
name: Module-CPANTS-Analyse
-version: 0.83
+version: 0.85
author:
- 'Thomas Klausner, <domm@cpan.org>, http://domm.zsi.at'
- |-
@@ -20,6 +20,7 @@ requires:
File::Find::Rule: 0
File::Slurp: 0
IO::Capture: 0.05
+ LWP::Simple: 0
List::MoreUtils: 0
Module::ExtractUse: 0.18
Module::Pluggable: 2.96
@@ -39,7 +40,7 @@ build_requires:
provides:
Module::CPANTS::Analyse:
file: lib/Module/CPANTS/Analyse.pm
- version: 0.83
+ version: 0.85
Module::CPANTS::Kwalitee:
file: lib/Module/CPANTS/Kwalitee.pm
Module::CPANTS::Kwalitee::BrokenInstaller:
@@ -13,7 +13,7 @@ use IO::Capture::Stdout;
use IO::Capture::Stderr;
use YAML::Syck qw(LoadFile);
-use version; our $VERSION=version->new('0.84');
+use version; our $VERSION=version->new('0.85');
# setup logger
if (! main->can('logger')) {
@@ -45,13 +45,15 @@ sub get_debian_data {
# debian_pkg, CPAN_dist, CPAN_vers, N_bugs, N_patches
my $header = <$fh>;
- chomp $header;
+ $header=~s/\s+$//s;
+ #chomp $header;
$csv->parse($header) or die "Could not parse header:\n$header\n";
my @header = $csv->fields;
#die Dumper \@header;
while (my $row = <$fh>) {
- chomp $row;
+ $row=~s/\s+$//s;
+ #chomp $row;
if ($csv->parse($row)) {
my @values = $csv->fields;
my %h;

0 comments on commit 2196c10

Please sign in to comment.