Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

upped version

  • Loading branch information...
commit ebb980f7dcb7df4849ff535f8890ab9cbb7eca15 1 parent 36137a8
@barbie authored
View
1  Changes
@@ -1,5 +1,6 @@
Revision history for Perl module CPAN::Testers::Data::Generator.
+1.04 2012-10-23
- script updates:
bin/cpanstats (v1.04)
- CHANGES => Changes.
View
4 META.json
@@ -1,6 +1,6 @@
{
"name": "CPAN-Testers-Data-Generator",
- "version": "1.03",
+ "version": "1.04",
"abstract": "CPAN Testers cpanstats Database Generator",
"author": [
"Barbie (BARBIE) <barbie@cpan.org>"
@@ -64,7 +64,7 @@
"provides": {
"CPAN::Testers::Data::Generator": {
"file": "lib/CPAN/Testers/Data/Generator.pm",
- "version": "1.03"
+ "version": "1.04"
}
},
"no_index": {
View
4 META.yml
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: CPAN-Testers-Data-Generator
-version: 1.03
+version: 1.04
abstract: CPAN Testers cpanstats Database Generator
author:
- Barbie <barbie@cpan.org>
@@ -44,7 +44,7 @@ build_requires:
provides:
CPAN::Testers::Data::Generator:
file: lib/CPAN/Testers/Data/Generator.pm
- version: 1.03
+ version: 1.04
no_index:
directory:
View
2  lib/CPAN/Testers/Data/Generator.pm
@@ -487,7 +487,7 @@ $self->_log("START TAIL\n");
my $guids = $self->get_tail_guids();
my $fh = IO::File->new($hash->{file},'a+') or die "Cannot read file [$hash->{file}]: $!";
- print "$_\n" for(@$guids);
+ print $fh "$_\n" for(@$guids);
$fh->close;
$self->_log("STOP TAIL\n");
Please sign in to comment.
Something went wrong with that request. Please try again.