Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP

Comparing changes

Choose two branches to see what’s changed or to start a new pull request. If you need to, you can also compare across forks.

Open a pull request

Create a new pull request by comparing changes across two branches. If you need to, you can also compare across forks.
base fork: jquelin/app-magpie
base: 9f741ea64d
...
head fork: jquelin/app-magpie
compare: bafff52783
  • 8 commits
  • 34 files changed
  • 0 commit comments
  • 1 contributor
Showing with 228 additions and 137 deletions.
  1. +2 −1  Build.PL
  2. +5 −0 Changes
  3. +28 −27 META.json
  4. +28 −27 META.yml
  5. +1 −1  README
  6. +2 −2 bin/magpie
  7. +2 −2 lib/App/Magpie.pm
  8. +2 −2 lib/App/Magpie/Action/BSWait.pm
  9. +2 −2 lib/App/Magpie/Action/Checkout.pm
  10. +2 −2 lib/App/Magpie/Action/DWIM.pm
  11. +2 −2 lib/App/Magpie/Action/FixSpec.pm
  12. +2 −2 lib/App/Magpie/Action/Old.pm
  13. +2 −2 lib/App/Magpie/Action/Old/Module.pm
  14. +2 −2 lib/App/Magpie/Action/Old/Set.pm
  15. +2 −2 lib/App/Magpie/Action/Update.pm
  16. +102 −25 lib/App/Magpie/Action/WebStatic.pm
  17. +2 −2 lib/App/Magpie/App.pm
  18. +2 −2 lib/App/Magpie/App/Command.pm
  19. +2 −2 lib/App/Magpie/App/Command/bswait.pm
  20. +2 −2 lib/App/Magpie/App/Command/checkout.pm
  21. +2 −2 lib/App/Magpie/App/Command/config.pm
  22. +2 −2 lib/App/Magpie/App/Command/dwim.pm
  23. +2 −2 lib/App/Magpie/App/Command/fixspec.pm
  24. +2 −2 lib/App/Magpie/App/Command/old.pm
  25. +2 −2 lib/App/Magpie/App/Command/update.pm
  26. +7 −4 lib/App/Magpie/App/Command/webstatic.pm
  27. +2 −2 lib/App/Magpie/Config.pm
  28. +2 −2 lib/App/Magpie/Constants.pm
  29. +2 −2 lib/App/Magpie/Logger.pm
  30. +2 −2 lib/App/Magpie/Role/Logging.pm
  31. +2 −2 lib/App/Magpie/Role/RunningCommand.pm
  32. +2 −2 lib/App/Magpie/URPM.pm
  33. +4 −2 share/webstatic/index.tt2
  34. +1 −0  t/000-report-versions-tiny.t
View
3  Build.PL
@@ -20,7 +20,7 @@ my %module_build_args = (
"Jerome Quelin <jquelin\@gmail.com>"
],
"dist_name" => "App-Magpie",
- "dist_version" => "1.120902",
+ "dist_version" => "1.120960",
"license" => "perl",
"module_name" => "App::Magpie",
"recommends" => {},
@@ -37,6 +37,7 @@ my %module_build_args = (
"File::ShareDir::PathClass" => 0,
"File::pushd" => 0,
"Find::Lib" => 0,
+ "LWP::Simple" => 0,
"LWP::UserAgent" => 0,
"List::MoreUtils" => 0,
"Log::Dispatchouli" => 0,
View
5 Changes
@@ -1,5 +1,10 @@
Changelog for App-Magpie
+1.120960 2012-04-05 19:52:31 Europe/Paris
+ - webstatic: fix distro name
+ - webstatic: show nb of perl packages shipped
+ - webstatic: store nb of mods/dists on cpan (not yet displayed)
+
1.120902 2012-03-30 18:17:38 Europe/Paris
- webstatic: provide rrd in the website
View
55 META.json
@@ -37,6 +37,7 @@
"File::ShareDir::PathClass" : "0",
"File::pushd" : "0",
"Find::Lib" : "0",
+ "LWP::Simple" : "0",
"LWP::UserAgent" : "0",
"List::MoreUtils" : "0",
"Log::Dispatchouli" : "0",
@@ -72,107 +73,107 @@
"provides" : {
"App::Magpie" : {
"file" : "lib/App/Magpie.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::BSWait" : {
"file" : "lib/App/Magpie/Action/BSWait.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::Checkout" : {
"file" : "lib/App/Magpie/Action/Checkout.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::DWIM" : {
"file" : "lib/App/Magpie/Action/DWIM.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::FixSpec" : {
"file" : "lib/App/Magpie/Action/FixSpec.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::Old" : {
"file" : "lib/App/Magpie/Action/Old.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::Old::Module" : {
"file" : "lib/App/Magpie/Action/Old/Module.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::Old::Set" : {
"file" : "lib/App/Magpie/Action/Old/Set.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::Update" : {
"file" : "lib/App/Magpie/Action/Update.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Action::WebStatic" : {
"file" : "lib/App/Magpie/Action/WebStatic.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App" : {
"file" : "lib/App/Magpie/App.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command" : {
"file" : "lib/App/Magpie/App/Command.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::bswait" : {
"file" : "lib/App/Magpie/App/Command/bswait.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::checkout" : {
"file" : "lib/App/Magpie/App/Command/checkout.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::config" : {
"file" : "lib/App/Magpie/App/Command/config.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::dwim" : {
"file" : "lib/App/Magpie/App/Command/dwim.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::fixspec" : {
"file" : "lib/App/Magpie/App/Command/fixspec.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::old" : {
"file" : "lib/App/Magpie/App/Command/old.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::update" : {
"file" : "lib/App/Magpie/App/Command/update.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::App::Command::webstatic" : {
"file" : "lib/App/Magpie/App/Command/webstatic.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Config" : {
"file" : "lib/App/Magpie/Config.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Constants" : {
"file" : "lib/App/Magpie/Constants.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Logger" : {
"file" : "lib/App/Magpie/Logger.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Role::Logging" : {
"file" : "lib/App/Magpie/Role/Logging.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::Role::RunningCommand" : {
"file" : "lib/App/Magpie/Role/RunningCommand.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
},
"App::Magpie::URPM" : {
"file" : "lib/App/Magpie/URPM.pm",
- "version" : "1.120902"
+ "version" : "1.120960"
}
},
"release_status" : "stable",
@@ -188,7 +189,7 @@
"web" : "http://github.com/jquelin/app-magpie"
}
},
- "version" : "1.120902",
+ "version" : "1.120960",
"x_Dist_Zilla" : {
"plugins" : [
{
View
55 META.yml
@@ -19,82 +19,82 @@ name: App-Magpie
provides:
App::Magpie:
file: lib/App/Magpie.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::BSWait:
file: lib/App/Magpie/Action/BSWait.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::Checkout:
file: lib/App/Magpie/Action/Checkout.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::DWIM:
file: lib/App/Magpie/Action/DWIM.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::FixSpec:
file: lib/App/Magpie/Action/FixSpec.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::Old:
file: lib/App/Magpie/Action/Old.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::Old::Module:
file: lib/App/Magpie/Action/Old/Module.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::Old::Set:
file: lib/App/Magpie/Action/Old/Set.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::Update:
file: lib/App/Magpie/Action/Update.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Action::WebStatic:
file: lib/App/Magpie/Action/WebStatic.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App:
file: lib/App/Magpie/App.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command:
file: lib/App/Magpie/App/Command.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::bswait:
file: lib/App/Magpie/App/Command/bswait.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::checkout:
file: lib/App/Magpie/App/Command/checkout.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::config:
file: lib/App/Magpie/App/Command/config.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::dwim:
file: lib/App/Magpie/App/Command/dwim.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::fixspec:
file: lib/App/Magpie/App/Command/fixspec.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::old:
file: lib/App/Magpie/App/Command/old.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::update:
file: lib/App/Magpie/App/Command/update.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::App::Command::webstatic:
file: lib/App/Magpie/App/Command/webstatic.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Config:
file: lib/App/Magpie/Config.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Constants:
file: lib/App/Magpie/Constants.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Logger:
file: lib/App/Magpie/Logger.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Role::Logging:
file: lib/App/Magpie/Role/Logging.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::Role::RunningCommand:
file: lib/App/Magpie/Role/RunningCommand.pm
- version: 1.120902
+ version: 1.120960
App::Magpie::URPM:
file: lib/App/Magpie/URPM.pm
- version: 1.120902
+ version: 1.120960
requires:
App::Cmd::Setup: 0
CPAN::Mini: 0
@@ -107,6 +107,7 @@ requires:
File::ShareDir::PathClass: 0
File::pushd: 0
Find::Lib: 0
+ LWP::Simple: 0
LWP::UserAgent: 0
List::MoreUtils: 0
Log::Dispatchouli: 0
@@ -133,7 +134,7 @@ resources:
bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=App-Magpie
homepage: http://search.cpan.org/dist/App-Magpie/
repository: git://github.com/jquelin/app-magpie.git
-version: 1.120902
+version: 1.120960
x_Dist_Zilla:
plugins:
-
View
2  README
@@ -1,7 +1,7 @@
This archive contains the distribution App-Magpie,
-version 1.120902:
+version 1.120960:
Mageia Perl Integration Easy
View
4 bin/magpie
@@ -14,7 +14,7 @@ use warnings;
package magpie;
{
- $magpie::VERSION = '1.120902';
+ $magpie::VERSION = '1.120960';
}
# ABSTRACT: Mageia Perl Integration Easy
@@ -36,7 +36,7 @@ magpie - Mageia Perl Integration Easy
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie;
{
- $App::Magpie::VERSION = '1.120902';
+ $App::Magpie::VERSION = '1.120960';
}
# ABSTRACT: Mageia Perl Integration Easy
@@ -28,7 +28,7 @@ App::Magpie - Mageia Perl Integration Easy
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/Action/BSWait.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::BSWait;
{
- $App::Magpie::Action::BSWait::VERSION = '1.120902';
+ $App::Magpie::Action::BSWait::VERSION = '1.120960';
}
# ABSTRACT: bswait command implementation
@@ -58,7 +58,7 @@ App::Magpie::Action::BSWait - bswait command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Action/Checkout.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::Checkout;
{
- $App::Magpie::Action::Checkout::VERSION = '1.120902';
+ $App::Magpie::Action::Checkout::VERSION = '1.120960';
}
# ABSTRACT: checkout command implementation
@@ -59,7 +59,7 @@ App::Magpie::Action::Checkout - checkout command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Action/DWIM.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::DWIM;
{
- $App::Magpie::Action::DWIM::VERSION = '1.120902';
+ $App::Magpie::Action::DWIM::VERSION = '1.120960';
}
# ABSTRACT: dwim command implementation
@@ -79,7 +79,7 @@ App::Magpie::Action::DWIM - dwim command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Action/FixSpec.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::FixSpec;
{
- $App::Magpie::Action::FixSpec::VERSION = '1.120902';
+ $App::Magpie::Action::FixSpec::VERSION = '1.120960';
}
# ABSTRACT: fixspec command implementation
@@ -214,7 +214,7 @@ App::Magpie::Action::FixSpec - fixspec command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Action/Old.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::Old;
{
- $App::Magpie::Action::Old::VERSION = '1.120902';
+ $App::Magpie::Action::Old::VERSION = '1.120960';
}
# ABSTRACT: old command implementation
@@ -66,7 +66,7 @@ App::Magpie::Action::Old - old command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Action/Old/Module.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::Old::Module;
{
- $App::Magpie::Action::Old::Module::VERSION = '1.120902';
+ $App::Magpie::Action::Old::Module::VERSION = '1.120960';
}
# ABSTRACT: module that has a newer version available
@@ -121,7 +121,7 @@ App::Magpie::Action::Old::Module - module that has a newer version available
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/Action/Old/Set.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::Old::Set;
{
- $App::Magpie::Action::Old::Set::VERSION = '1.120902';
+ $App::Magpie::Action::Old::Set::VERSION = '1.120960';
}
# ABSTRACT: a set of AM::Old::Modules objects
@@ -50,7 +50,7 @@ App::Magpie::Action::Old::Set - a set of AM::Old::Modules objects
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Action/Update.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Action::Update;
{
- $App::Magpie::Action::Update::VERSION = '1.120902';
+ $App::Magpie::Action::Update::VERSION = '1.120960';
}
# ABSTRACT: update command implementation
@@ -135,7 +135,7 @@ App::Magpie::Action::Update - update command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
127 lib/App/Magpie/Action/WebStatic.pm
@@ -12,15 +12,17 @@ use warnings;
package App::Magpie::Action::WebStatic;
{
- $App::Magpie::Action::WebStatic::VERSION = '1.120902';
+ $App::Magpie::Action::WebStatic::VERSION = '1.120960';
}
# ABSTRACT: webstatic command implementation
use DateTime;
use File::Copy;
use File::HomeDir::PathClass qw{ my_dist_data };
+use LWP::Simple;
use Moose;
use ORDB::CPAN::Mageia;
+use Parse::CPAN::Packages::Fast;
use Path::Class;
use RRDTool::OO;
use Readonly;
@@ -31,37 +33,64 @@ use App::Magpie::Constants qw{ $SHAREDIR };
with 'App::Magpie::Role::Logging';
+my $datadir = my_dist_data( "App-Magpie", { create=>1 } );
+my $rrdsdir = $datadir->subdir( "rrds" );
+
+my $rrdvers = $rrdsdir->file( "version" );
+my %rrdfile = (
+ mga_mods => $rrdsdir->file( "mageia-modules.rrd" ),
+ mga_dists => $rrdsdir->file( "mageia-dists.rrd" ),
+ cpan_mods => $rrdsdir->file( "cpan-modules.rrd" ),
+ cpan_dists => $rrdsdir->file( "cpan-dists.rrd" ),
+);
+my %rrd;
+
+
sub run {
my ($self, $opts) = @_;
+ $self->_migrate_and_create_rrds_if_needed;
- # first, update the rrd file with the number of available modules
- my $datadir = my_dist_data( "App-Magpie", { create=>1 } );
- my $rrdfile = $datadir->file( "modules.rrd" );
-
- my $rrd = RRDTool::OO->new( file=>$rrdfile );
- if ( ! -f $rrdfile ) {
- $rrd->create(
- step => 60*60*24, # 1 measure per day
- data_source => {
- name => "nbmodules",
- type => "GAUGE",
- },
- archive => { rows => 365 * 100 }, # data kept for 100 years
- );
- }
+ # -- first, update the rrd files
+ $self->log( "** updating rrd files" );
- my $nbmodules = ORDB::CPAN::Mageia::Module->count;
- $rrd->update( $nbmodules );
+ my $mgamods = ORDB::CPAN::Mageia::Module->count;
+ $rrd{mga_mods}->update( $mgamods );
+ $self->log_debug( "mageia modules: $mgamods" );
- # create the web site
+ my $mgadists = ORDB::CPAN::Mageia->selectcol_arrayref(
+ 'SELECT DISTINCT dist FROM module ORDER BY dist'
+ );
+ my $nbmgadists = scalar @$mgadists;
+ $rrd{mga_dists}->update( $nbmgadists );
+ $self->log_debug( "mageia dists: $nbmgadists" );
+
+ my $modpkg = $datadir->file( "02packages.details.txt.gz" );
+ my $src = "http://cpan.cpantesters.org/modules/02packages.details.txt.gz";
+ mirror( $src, $modpkg->stringify );
+ my $p = Parse::CPAN::Packages::Fast->new($modpkg->stringify);
+ my $cpanmods = $p->package_count;
+ my $cpandists = $p->distribution_count;
+ $rrd{cpan_mods}->update( $cpanmods );
+ $self->log_debug( "cpan modules: $cpanmods" );
+ $rrd{cpan_dists}->update( $cpandists );
+ $self->log_debug( "cpan dists: $cpandists" );
+
+
+ # -- create the web site
+ $self->log( "** creating web site" );
+ $opts->{directory} =~ s!/$!!;
my $dir = dir( $opts->{directory} . ".new" );
$dir->rmtree; $dir->mkpath;
+
+ # images
+ $self->log_debug( "images:" );
my $imgdir = $dir->subdir( "images" );
$imgdir->mkpath;
- $rrd->graph(
- image => $imgdir->file("nbmodules.png"),
+ $self->log_debug( " - mageia modules" );
+ $rrd{mga_mods}->graph(
+ image => $imgdir->file("mgamods.png"),
width => 800,
title => 'Number of available Perl modules in Mageia Linux',
start => DateTime->new(year=>2012)->epoch,
@@ -69,29 +98,77 @@ sub run {
thickness => 2,
color => '0000FF',
},
+ units_exponent => 0,
);
+ # template toolkit
+ $self->log_debug( "template toolkit processing" );
my $tt = Template->new({
INCLUDE_PATH => $SHAREDIR->subdir("webstatic"),
INTERPOLATE => 1,
}) or die "$Template::ERROR\n";
my $vars = {
- nbmodules => $nbmodules,
- date => scalar localtime,
+ mgamods => $mgamods,
+ mgadists => $nbmgadists,
+ date => scalar localtime,
};
$tt->process('index.tt2', $vars, $dir->file("index.html")->stringify)
or die $tt->error(), "\n";
- copy( $rrdfile->stringify, $dir->stringify );
+ # rrd files
+ $self->log_debug( "copying rrd files" );
+ my $rrdsubdir = $dir->subdir( "rrds" );
+ $rrdsubdir->mkpath;
+ foreach my $f ( keys %rrdfile ) {
+ copy( $rrdfile{$f}->stringify, $rrdsubdir->stringify );
+ }
# update website in one pass: remove previous version, replace it by new one
+ $self->log( "** updating web site" );
my $olddir = dir( $opts->{directory} );
$olddir->rmtree;
move( $dir->stringify, $olddir->stringify );
}
+# -- private methods
+
+sub _migrate_and_create_rrds_if_needed {
+ my $self = shift;
+ $rrdsdir->mkpath;
+
+ # v0 - too bad, drop existing files
+ my $rrdfile = $datadir->file( "modules.rrd" );
+ if ( -e $rrdfile ) {
+ $self->log( "converting from v0" );
+ $self->log_debug( "removing $rrdfile" );
+ $rrdfile->remove
+ }
+
+ # create rrds
+ $self->log("creating rrd files");
+ foreach my $f ( keys %rrdfile ) {
+ $rrd{$f} = RRDTool::OO->new( file=>$rrdfile{$f} );
+ next if -f $rrdfile{$f};
+ $self->log_debug( "creating $rrdfile{$f}" );
+ $rrd{$f}->create(
+ step => 60*60*24, # 1 measure per day
+ data_source => {
+ name => "nb",
+ type => "GAUGE",
+ },
+ archive => { rows => 365 * 100 }, # data kept for 100 years (!)
+ );
+ }
+
+ # saving rrd schema version
+ $self->log_debug( "saving schema version" );
+ my $fh = $rrdvers->openw;
+ $fh->print( "1" );
+ $fh->close;
+}
+
1;
@@ -103,7 +180,7 @@ App::Magpie::Action::WebStatic - webstatic command implementation
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/App.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App;
{
- $App::Magpie::App::VERSION = '1.120902';
+ $App::Magpie::App::VERSION = '1.120960';
}
# ABSTRACT: magpie's App::Cmd
@@ -31,7 +31,7 @@ App::Magpie::App - magpie's App::Cmd
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/App/Command.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command;
{
- $App::Magpie::App::Command::VERSION = '1.120902';
+ $App::Magpie::App::Command::VERSION = '1.120960';
}
# ABSTRACT: base class for sub-commands
@@ -68,7 +68,7 @@ App::Magpie::App::Command - base class for sub-commands
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/App/Command/bswait.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::bswait;
{
- $App::Magpie::App::Command::bswait::VERSION = '1.120902';
+ $App::Magpie::App::Command::bswait::VERSION = '1.120960';
}
# ABSTRACT: pause according to build-system recommendations
@@ -56,7 +56,7 @@ App::Magpie::App::Command::bswait - pause according to build-system recommendati
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/App/Command/checkout.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::checkout;
{
- $App::Magpie::App::Command::checkout::VERSION = '1.120902';
+ $App::Magpie::App::Command::checkout::VERSION = '1.120960';
}
# ABSTRACT: check-out or update a given package
@@ -67,7 +67,7 @@ App::Magpie::App::Command::checkout - check-out or update a given package
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/App/Command/config.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::config;
{
- $App::Magpie::App::Command::config::VERSION = '1.120902';
+ $App::Magpie::App::Command::config::VERSION = '1.120960';
}
# ABSTRACT: update a spec file to match some policies
@@ -64,7 +64,7 @@ App::Magpie::App::Command::config - update a spec file to match some policies
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/App/Command/dwim.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::dwim;
{
- $App::Magpie::App::Command::dwim::VERSION = '1.120902';
+ $App::Magpie::App::Command::dwim::VERSION = '1.120960';
}
# ABSTRACT: automagically update Mageia packages
@@ -53,7 +53,7 @@ App::Magpie::App::Command::dwim - automagically update Mageia packages
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/App/Command/fixspec.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::fixspec;
{
- $App::Magpie::App::Command::fixspec::VERSION = '1.120902';
+ $App::Magpie::App::Command::fixspec::VERSION = '1.120960';
}
# ABSTRACT: update a spec file to match some policies
@@ -52,7 +52,7 @@ App::Magpie::App::Command::fixspec - update a spec file to match some policies
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/App/Command/old.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::old;
{
- $App::Magpie::App::Command::old::VERSION = '1.120902';
+ $App::Magpie::App::Command::old::VERSION = '1.120960';
}
# ABSTRACT: report installed perl modules with new version available
@@ -113,7 +113,7 @@ App::Magpie::App::Command::old - report installed perl modules with new version
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/App/Command/update.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::update;
{
- $App::Magpie::App::Command::update::VERSION = '1.120902';
+ $App::Magpie::App::Command::update::VERSION = '1.120960';
}
# ABSTRACT: update a perl module to its latest version
@@ -56,7 +56,7 @@ App::Magpie::App::Command::update - update a perl module to its latest version
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
11 lib/App/Magpie/App/Command/webstatic.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::App::Command::webstatic;
{
- $App::Magpie::App::Command::webstatic::VERSION = '1.120902';
+ $App::Magpie::App::Command::webstatic::VERSION = '1.120960';
}
# ABSTRACT: create a static web site
@@ -30,8 +30,11 @@ sub opt_spec {
my $self = shift;
return (
[],
- [ 'directory|d=s' => "directory where website will be created"
-=>{required=>1} ],
+ [
+ 'directory|d=s'
+ => "directory where website will be created"
+ => { required => 1 }
+ ],
[],
$self->verbose_options,
);
@@ -55,7 +58,7 @@ App::Magpie::App::Command::webstatic - create a static web site
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/Config.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Config;
{
- $App::Magpie::Config::VERSION = '1.120902';
+ $App::Magpie::Config::VERSION = '1.120960';
}
# ABSTRACT: magpie configuration storage & retrieval
@@ -69,7 +69,7 @@ App::Magpie::Config - magpie configuration storage & retrieval
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Constants.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Constants;
{
- $App::Magpie::Constants::VERSION = '1.120902';
+ $App::Magpie::Constants::VERSION = '1.120960';
}
# ABSTRACT: Various constants
@@ -38,7 +38,7 @@ App::Magpie::Constants - Various constants
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 DESCRIPTION
View
4 lib/App/Magpie/Logger.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Logger;
{
- $App::Magpie::Logger::VERSION = '1.120902';
+ $App::Magpie::Logger::VERSION = '1.120960';
}
# ABSTRACT: magpie logging facility
@@ -81,7 +81,7 @@ App::Magpie::Logger - magpie logging facility
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Role/Logging.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Role::Logging;
{
- $App::Magpie::Role::Logging::VERSION = '1.120902';
+ $App::Magpie::Role::Logging::VERSION = '1.120960';
}
# ABSTRACT: sthg that can log
@@ -44,7 +44,7 @@ App::Magpie::Role::Logging - sthg that can log
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/Role/RunningCommand.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::Role::RunningCommand;
{
- $App::Magpie::Role::RunningCommand::VERSION = '1.120902';
+ $App::Magpie::Role::RunningCommand::VERSION = '1.120960';
}
# ABSTRACT: sthg that can run an external command
@@ -50,7 +50,7 @@ App::Magpie::Role::RunningCommand - sthg that can run an external command
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
4 lib/App/Magpie/URPM.pm
@@ -12,7 +12,7 @@ use warnings;
package App::Magpie::URPM;
{
- $App::Magpie::URPM::VERSION = '1.120902';
+ $App::Magpie::URPM::VERSION = '1.120960';
}
# ABSTRACT: magpie interface to urpm
@@ -60,7 +60,7 @@ App::Magpie::URPM - magpie interface to urpm
=head1 VERSION
-version 1.120902
+version 1.120960
=head1 SYNOPSIS
View
6 share/webstatic/index.tt2
@@ -5,10 +5,12 @@
<body>
-<h2><a href="http://mageia.org">Mageia Linux</a> ships with [%nbmodules%] Perl modules!</h2>
+<h2><a href="http://mageia.org">Mageia</a> ships with [%mgadists%] Perl
+packages!</h2>
+<p> This represents [%mgamods%] Perl modules.</p>
<img
- src="images/nbmodules.png"
+ src="images/mgamods.png"
alt="evolution of perl modules within Mageia Linux">
<p> <i>Page generated on [%date%].</i> </p>
View
1  t/000-report-versions-tiny.t
@@ -61,6 +61,7 @@ eval { $v .= pmver('File::ShareDir::PathClass','any version') };
eval { $v .= pmver('File::Temp','any version') };
eval { $v .= pmver('File::pushd','any version') };
eval { $v .= pmver('Find::Lib','any version') };
+eval { $v .= pmver('LWP::Simple','any version') };
eval { $v .= pmver('LWP::UserAgent','any version') };
eval { $v .= pmver('List::MoreUtils','any version') };
eval { $v .= pmver('Log::Dispatchouli','any version') };

No commit comments for this range

Something went wrong with that request. Please try again.