update M::I

This commit is contained in:
Oliver Gorwits
2015-01-03 10:07:24 +00:00
parent ca078c8f62
commit 7a7e4b81ce
11 changed files with 21 additions and 16 deletions

View File

@@ -7,11 +7,11 @@ build_requires:
ExtUtils::MakeMaker: 6.59 ExtUtils::MakeMaker: 6.59
Test::More: 0.88 Test::More: 0.88
configure_requires: configure_requires:
DBIx::Class: '0.082801' DBIx::Class: 0.082801
ExtUtils::MakeMaker: 6.59 ExtUtils::MakeMaker: 6.59
distribution_type: module distribution_type: module
dynamic_config: 1 dynamic_config: 1
generated_by: 'Module::Install version 1.12' generated_by: 'Module::Install version 1.14'
license: bsd license: bsd
meta-spec: meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -39,7 +39,7 @@ requires:
DBIx::Class: 0.08281 DBIx::Class: 0.08281
DBIx::Class::Helpers: 2.024 DBIx::Class::Helpers: 2.024
Daemon::Control: 0.001006 Daemon::Control: 0.001006
Dancer: '1.3132' Dancer: 1.3132
Dancer::Plugin::Auth::Extensible: 0.3 Dancer::Plugin::Auth::Extensible: 0.3
Dancer::Plugin::DBIC: 0.2001 Dancer::Plugin::DBIC: 0.2001
Dancer::Plugin::Passphrase: 2.0.1 Dancer::Plugin::Passphrase: 2.0.1
@@ -49,7 +49,8 @@ requires:
Guard: 1.022 Guard: 1.022
HTML::Parser: 3.7 HTML::Parser: 3.7
HTTP::Tiny: 0.029 HTTP::Tiny: 0.029
JSON: 0 JSON: 2.9
JSON::XS: 3.01
List::MoreUtils: 0.33 List::MoreUtils: 0.33
MCE: 1.52 MCE: 1.52
MIME::Base64: 3.13 MIME::Base64: 3.13
@@ -68,7 +69,7 @@ requires:
Plack::Middleware::ReverseProxy: 0.15 Plack::Middleware::ReverseProxy: 0.15
Role::Tiny: 1.002005 Role::Tiny: 1.002005
SNMP::Info: 3.18 SNMP::Info: 3.18
SQL::Translator: '0.11018' SQL::Translator: 0.11018
Sereal: 0 Sereal: 0
Socket6: 0.23 Socket6: 0.23
Starman: 0.4008 Starman: 0.4008
@@ -91,4 +92,4 @@ resources:
homepage: http://netdisco.org/ homepage: http://netdisco.org/
license: http://opensource.org/licenses/bsd-license.php license: http://opensource.org/licenses/bsd-license.php
repository: git://git.code.sf.net/p/netdisco/netdisco-ng repository: git://git.code.sf.net/p/netdisco/netdisco-ng
version: '2.029014' version: 2.029014

View File

@@ -31,7 +31,7 @@ BEGIN {
# This is not enforced yet, but will be some time in the next few # This is not enforced yet, but will be some time in the next few
# releases once we can make sure it won't clash with custom # releases once we can make sure it won't clash with custom
# Module::Install extensions. # Module::Install extensions.
$VERSION = '1.12'; $VERSION = '1.14';
# Storage for the pseudo-singleton # Storage for the pseudo-singleton
$MAIN = undef; $MAIN = undef;
@@ -378,6 +378,7 @@ eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@;
sub _read { sub _read {
local *FH; local *FH;
open( FH, '<', $_[0] ) or die "open($_[0]): $!"; open( FH, '<', $_[0] ) or die "open($_[0]): $!";
binmode FH;
my $string = do { local $/; <FH> }; my $string = do { local $/; <FH> };
close FH or die "close($_[0]): $!"; close FH or die "close($_[0]): $!";
return $string; return $string;
@@ -386,6 +387,7 @@ END_NEW
sub _read { sub _read {
local *FH; local *FH;
open( FH, "< $_[0]" ) or die "open($_[0]): $!"; open( FH, "< $_[0]" ) or die "open($_[0]): $!";
binmode FH;
my $string = do { local $/; <FH> }; my $string = do { local $/; <FH> };
close FH or die "close($_[0]): $!"; close FH or die "close($_[0]): $!";
return $string; return $string;
@@ -416,6 +418,7 @@ eval( $] >= 5.006 ? <<'END_NEW' : <<'END_OLD' ); die $@ if $@;
sub _write { sub _write {
local *FH; local *FH;
open( FH, '>', $_[0] ) or die "open($_[0]): $!"; open( FH, '>', $_[0] ) or die "open($_[0]): $!";
binmode FH;
foreach ( 1 .. $#_ ) { foreach ( 1 .. $#_ ) {
print FH $_[$_] or die "print($_[0]): $!"; print FH $_[$_] or die "print($_[0]): $!";
} }
@@ -425,6 +428,7 @@ END_NEW
sub _write { sub _write {
local *FH; local *FH;
open( FH, "> $_[0]" ) or die "open($_[0]): $!"; open( FH, "> $_[0]" ) or die "open($_[0]): $!";
binmode FH;
foreach ( 1 .. $#_ ) { foreach ( 1 .. $#_ ) {
print FH $_[$_] or die "print($_[0]): $!"; print FH $_[$_] or die "print($_[0]): $!";
} }

View File

@@ -4,7 +4,7 @@ package Module::Install::Base;
use strict 'vars'; use strict 'vars';
use vars qw{$VERSION}; use vars qw{$VERSION};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
} }
# Suspend handler for "redefined" warnings # Suspend handler for "redefined" warnings

View File

@@ -8,7 +8,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -8,7 +8,7 @@ use Fcntl qw/:flock :seek/;
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -8,7 +8,7 @@ use ExtUtils::Manifest ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = 'Module::Install::Base'; @ISA = 'Module::Install::Base';
$ISCORE = 1; $ISCORE = 1;
} }

View File

@@ -6,7 +6,7 @@ use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE}; use vars qw{$VERSION @ISA $ISCORE};
BEGIN { BEGIN {
$VERSION = '1.12'; $VERSION = '1.14';
@ISA = qw{Module::Install::Base}; @ISA = qw{Module::Install::Base};
$ISCORE = 1; $ISCORE = 1;
} }