r52777 - in /trunk/libaudio-mpd-common-perl: ./ debian/ lib/Audio/MPD/ lib/Audio/MPD/Common/ lib/Audio/MPD/Common/Item/ t/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Mon Feb 15 04:24:31 UTC 2010
Author: jawnsy-guest
Date: Mon Feb 15 04:24:10 2010
New Revision: 52777
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=52777
Log:
* New upstream release
* Standards-Version 3.8.4 (no changes)
* Now requires M::B 0.3601, not in core as of 5.10
* Add new dependencies on Getopt::Euclid, Proc::Daemon and
Test::Corpus::Audio::MPD
Removed:
trunk/libaudio-mpd-common-perl/Makefile.PL
Modified:
trunk/libaudio-mpd-common-perl/Build.PL
trunk/libaudio-mpd-common-perl/Changes
trunk/libaudio-mpd-common-perl/MANIFEST
trunk/libaudio-mpd-common-perl/META.yml
trunk/libaudio-mpd-common-perl/README
trunk/libaudio-mpd-common-perl/debian/changelog
trunk/libaudio-mpd-common-perl/debian/control
trunk/libaudio-mpd-common-perl/dist.ini
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Directory.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Playlist.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Song.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Stats.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Status.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Time.pm
trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Types.pm
trunk/libaudio-mpd-common-perl/t/00-compile.t
trunk/libaudio-mpd-common-perl/t/10-item.t
trunk/libaudio-mpd-common-perl/t/11-time.t
trunk/libaudio-mpd-common-perl/t/12-status.t
trunk/libaudio-mpd-common-perl/t/13-stats.t
trunk/libaudio-mpd-common-perl/t/author-critic.t
Modified: trunk/libaudio-mpd-common-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/Build.PL?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/Build.PL (original)
+++ trunk/libaudio-mpd-common-perl/Build.PL Mon Feb 15 04:24:10 2010
@@ -2,32 +2,33 @@
use strict;
use warnings;
-use Module::Build;
+use Module::Build 0.3601;
-my $build = Module::Build->new(
- module_name => 'Audio::MPD::Common',
- license => 'perl',
- dist_abstract => "common\ helper\ classes\ for\ mpd",
- dist_name => "Audio\-MPD\-Common",
- dist_author => [
-"Jerome\ Quelin",
- ],
- requires => {
- "base" => '0',
- "MooseX::Has::Sugar" => '0',
- "MooseX::Types::Moose" => '0',
- "English" => '0',
- "ExtUtils::MakeMaker" => '0',
- "overload" => '0',
- "Sub::Exporter" => '0',
- "Moose::Util::TypeConstraints" => '0',
- "Readonly" => '0',
- "Test::More" => '0',
- "perl" => '5.008',
- "File::Find" => '0',
- "Moose" => '0.92',
- },
- script_files => [ qw() ],
-);
+my %module_build_args = (
+ 'dist_abstract' => 'common helper classes for mpd',
+ 'dist_author' => [
+ 'Jerome Quelin'
+ ],
+ 'dist_name' => 'Audio-MPD-Common',
+ 'script_files' => [],
+ 'module_name' => 'Audio::MPD::Common',
+ 'requires' => {
+ 'MooseX::Has::Sugar' => 0,
+ 'MooseX::Types::Moose' => 0,
+ 'English' => 0,
+ 'overload' => 0,
+ 'Moose::Util::TypeConstraints' => 0,
+ 'Readonly' => 0,
+ 'Test::More' => 0,
+ 'perl' => '5.008',
+ 'File::Find' => 0,
+ 'File::Temp' => 0,
+ 'Moose' => '0.92'
+ },
+ 'license' => 'perl'
+ );
+
+
+my $build = Module::Build->new(%module_build_args);
$build->create_build_script;
Modified: trunk/libaudio-mpd-common-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/Changes?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/Changes (original)
+++ trunk/libaudio-mpd-common-perl/Changes Mon Feb 15 04:24:10 2010
@@ -1,6 +1,10 @@
Revision history for Audio-MPD-Common
-1.093190 2009-11-15 11:14:07 UTC
+1.100430 2010-02-12 12:55:26 Europe/Paris
+ - WARNING: no more makefile.pl supplied, only a build.pl
+ - sub::exporter no more used internally
+
+1.093190 Sun Nov 15 12:14:23 2009
- isolating types in amc:types
- sweetening code with moosex::has::sugar
Modified: trunk/libaudio-mpd-common-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/MANIFEST?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/MANIFEST (original)
+++ trunk/libaudio-mpd-common-perl/MANIFEST Mon Feb 15 04:24:10 2010
@@ -3,7 +3,6 @@
LICENSE
MANIFEST
META.yml
-Makefile.PL
README
dist.ini
lib/Audio/MPD/Common.pm
Modified: trunk/libaudio-mpd-common-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/META.yml?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/META.yml (original)
+++ trunk/libaudio-mpd-common-perl/META.yml Mon Feb 15 04:24:10 2010
@@ -2,7 +2,11 @@
abstract: 'common helper classes for mpd'
author:
- 'Jerome Quelin'
-generated_by: 'Dist::Zilla version 1.093140'
+build_requires:
+ Module::Build: 0.3601
+configure_requires:
+ Module::Build: 0.3601
+generated_by: 'Dist::Zilla version 1.100160'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -11,46 +15,45 @@
provides:
Audio::MPD::Common:
file: lib/Audio/MPD/Common.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Item:
file: lib/Audio/MPD/Common/Item.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Item::Directory:
file: lib/Audio/MPD/Common/Item/Directory.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Item::Playlist:
file: lib/Audio/MPD/Common/Item/Playlist.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Item::Song:
file: lib/Audio/MPD/Common/Item/Song.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Stats:
file: lib/Audio/MPD/Common/Stats.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Status:
file: lib/Audio/MPD/Common/Status.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Time:
file: lib/Audio/MPD/Common/Time.pm
- version: 1.093190
+ version: 1.100430
Audio::MPD::Common::Types:
file: lib/Audio/MPD/Common/Types.pm
- version: 1.093190
+ version: 1.100430
requires:
English: 0
File::Find: 0
+ File::Temp: 0
Moose: 0.92
Moose::Util::TypeConstraints: 0
MooseX::Has::Sugar: 0
MooseX::Types::Moose: 0
Readonly: 0
- Sub::Exporter: 0
Test::More: 0
- base: 0
overload: 0
perl: 5.008
resources:
MailingList: http://groups.google.com/group/audio-mpd
homepage: http://search.cpan.org/dist/Audio-MPD-Common
repository: http://github.com/jquelin/audio-mpd-common
-version: 1.093190
+version: 1.100430
Modified: trunk/libaudio-mpd-common-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/README?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/README (original)
+++ trunk/libaudio-mpd-common-perl/README Mon Feb 15 04:24:10 2010
@@ -1,7 +1,7 @@
This archive contains the distribution Audio-MPD-Common, version
-1.093190:
+1.100430:
common helper classes for mpd
Modified: trunk/libaudio-mpd-common-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/debian/changelog?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/debian/changelog (original)
+++ trunk/libaudio-mpd-common-perl/debian/changelog Mon Feb 15 04:24:10 2010
@@ -1,3 +1,13 @@
+libaudio-mpd-common-perl (1.100430-1) UNRELEASED; urgency=low
+
+ * New upstream release
+ * Standards-Version 3.8.4 (no changes)
+ * Now requires M::B 0.3601, not in core as of 5.10
+ * Add new dependencies on Getopt::Euclid, Proc::Daemon and
+ Test::Corpus::Audio::MPD
+
+ -- Jonathan Yu <jawnsy at cpan.org> Sun, 14 Feb 2010 23:42:44 -0500
+
libaudio-mpd-common-perl (1.093190-1) unstable; urgency=low
* New upstream release
Modified: trunk/libaudio-mpd-common-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/debian/control?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/debian/control (original)
+++ trunk/libaudio-mpd-common-perl/debian/control Mon Feb 15 04:24:10 2010
@@ -1,16 +1,17 @@
Source: libaudio-mpd-common-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 7.0.50)
+Build-Depends: debhelper (>= 7.0.50), libmodule-build-perl (>= 0.3601)
Build-Depends-Indep: perl, libmoose-perl (>= 0.92), libmoosex-has-sugar-perl,
libmoosex-types-perl, libreadonly-perl, libsub-exporter-perl,
libtest-cpan-meta-perl, libtest-pod-coverage-perl, libtest-pod-perl,
- libpod-coverage-trustpod-perl
+ libpod-coverage-trustpod-perl, libgetopt-euclid-perl,
+ libproc-daemon-perl, libtest-corpus-audio-mpd-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Jose Luis Rivas <ghostbar38 at gmail.com>,
Rene Mayorga <rmayorga at debian.org.sv>, gregor herrmann <gregoa at debian.org>,
Jonathan Yu <jawnsy at cpan.org>
-Standards-Version: 3.8.3
+Standards-Version: 3.8.4
Homepage: http://search.cpan.org/dist/Audio-MPD-Common
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libaudio-mpd-common-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libaudio-mpd-common-perl/
Modified: trunk/libaudio-mpd-common-perl/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/dist.ini?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/dist.ini (original)
+++ trunk/libaudio-mpd-common-perl/dist.ini Mon Feb 15 04:24:10 2010
@@ -4,72 +4,10 @@
copyright_holder = Jerome Quelin
copyright_year = 2007
-
; -- static meta-information
-
[MetaResources]
homepage = http://search.cpan.org/dist/Audio-MPD-Common
repository = http://github.com/jquelin/audio-mpd-common
MailingList = http://groups.google.com/group/audio-mpd
-[AutoVersion]
-major = 1
-format = {{ $major }}.{{ cldr('yyDDD') }}{{ sprintf '%01u', ($ENV{N} || 0) }}
-
-
-; -- fetch & generate files
-
-[AllFiles]
-
-[CompileTests]
-[CriticTests]
-[MetaTests]
-[PodTests]
-
-
-; -- remove files
-
-[PruneCruft]
-
-;[PruneFiles]
-; file =
-
-[ManifestSkip]
-
-
-; -- get prereqs
-
-[AutoPrereq]
-
-
-; -- munge files
-
-[ExtraTests]
-[NextRelease]
-[PkgVersion]
-[PodWeaver]
-[Prepender]
-copyright = 1
-
-
-; -- dynamic meta information
-
-[InstallDirs]
-[MetaProvides::Package]
-
-
-; -- generate meta files
-
-[License]
-[MakeMaker]
-[ModuleBuild]
-[MetaYAML]
-[Readme]
-
-[Manifest] ; should come last
-
-
-; -- release
-
-[CheckChangeLog]
-[UploadToCPAN]
+[@JQUELIN]
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: common helper classes for mpd
1;
@@ -27,7 +25,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -120,4 +118,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Item;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: a generic collection item
use Audio::MPD::Common::Item::Directory;
@@ -47,7 +45,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 SYNOPSIS
@@ -86,4 +84,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Directory.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Directory.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Directory.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Directory.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Item::Directory;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: a directory object
use Moose;
@@ -39,7 +37,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -69,4 +67,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Playlist.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Playlist.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Playlist.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Playlist.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Item::Playlist;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: a playlist object
use Moose;
@@ -40,7 +38,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -74,4 +72,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Song.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Song.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Song.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Item/Song.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Item::Song;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: a song object with some audio tags
use Moose;
@@ -72,7 +70,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -170,4 +168,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Stats.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Stats.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Stats.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Stats.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Stats;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: class representing MPD stats
use Moose;
@@ -44,7 +42,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -102,4 +100,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Status.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Status.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Status.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Status.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Status;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: class representing MPD status
use Moose;
@@ -54,7 +52,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -144,4 +142,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Time.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Time.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Time.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Time.pm Mon Feb 15 04:24:10 2010
@@ -11,9 +11,7 @@
use warnings;
package Audio::MPD::Common::Time;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: class representing time of current song
use Moose 0.92; # need hash trait
@@ -110,7 +108,7 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
@@ -201,4 +199,6 @@
=cut
-__END__
+__END__
+
+
Modified: trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Types.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Types.pm?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Types.pm (original)
+++ trunk/libaudio-mpd-common-perl/lib/Audio/MPD/Common/Types.pm Mon Feb 15 04:24:10 2010
@@ -11,14 +11,10 @@
use strict;
package Audio::MPD::Common::Types;
-our $VERSION = '1.093190';
-
-
+our $VERSION = '1.100430';
# ABSTRACT: types used in the distribution
use Moose::Util::TypeConstraints;
-use Sub::Exporter;
-use Sub::Exporter -setup => { exports => [ qw{ State } ] };
use Audio::MPD::Common::Time;
@@ -27,7 +23,6 @@
coerce 'Audio::MPD::Common::Time'
=> from 'Str'
=> via { Audio::MPD::Common::Time->new(time=>$_) };
-
1;
@@ -40,15 +35,14 @@
=head1 VERSION
-version 1.093190
+version 1.100430
=head1 DESCRIPTION
This module implements the specific types used by the distribution, and
-exports them. It is using L<Sub::Exporter> underneath, so you can use
-all the shenanigans to change the export names.
+exports them (exporting is done by L<Moose::Util::TypeConstraints>).
-Current types defined and exported:
+Current types defined:
=over 4
@@ -73,4 +67,5 @@
=cut
-__END__
+__END__
+
Modified: trunk/libaudio-mpd-common-perl/t/00-compile.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/t/00-compile.t?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/t/00-compile.t (original)
+++ trunk/libaudio-mpd-common-perl/t/00-compile.t Mon Feb 15 04:24:10 2010
@@ -13,6 +13,7 @@
use Test::More;
use File::Find;
+use File::Temp qw{ tempdir };
my @modules;
find(
@@ -31,16 +32,21 @@
my @scripts = glob "bin/*";
plan tests => scalar(@modules) + scalar(@scripts);
-
-is( qx{ $^X -Ilib -M$_ -e "print '$_ ok'" }, "$_ ok", "$_ loaded ok" )
- for sort @modules;
-
-SKIP: {
- eval "use Test::Script; 1;";
- skip "Test::Script needed to test script compilation", scalar(@scripts) if $@;
- foreach my $file ( @scripts ) {
- my $script = $file;
- $script =~ s!.*/!!;
- script_compiles_ok( $file, "$script script compiles" );
+
+{
+ # fake home for cpan-testers
+ # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
+
+ is( qx{ $^X -Ilib -M$_ -e "print '$_ ok'" }, "$_ ok", "$_ loaded ok" )
+ for sort @modules;
+
+ SKIP: {
+ eval "use Test::Script; 1;";
+ skip "Test::Script needed to test script compilation", scalar(@scripts) if $@;
+ foreach my $file ( @scripts ) {
+ my $script = $file;
+ $script =~ s!.*/!!;
+ script_compiles_ok( $file, "$script script compiles" );
+ }
}
-}
+}
Modified: trunk/libaudio-mpd-common-perl/t/10-item.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/t/10-item.t?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/t/10-item.t (original)
+++ trunk/libaudio-mpd-common-perl/t/10-item.t Mon Feb 15 04:24:10 2010
@@ -86,4 +86,4 @@
isa_ok( $i, 'Audio::MPD::Common::Item::Playlist', 'playlist creation' );
is( $i->playlist, 'some_name', 'accessor: playlist' );
is( $i->last_modified, '2006-12-13T19:53:50Z', 'accessor: last_modified' );
-isa_ok( $i, 'Audio::MPD::Common::Item', 'playlistinherits from item' );
+isa_ok( $i, 'Audio::MPD::Common::Item', 'playlistinherits from item' );
Modified: trunk/libaudio-mpd-common-perl/t/11-time.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/t/11-time.t?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/t/11-time.t (original)
+++ trunk/libaudio-mpd-common-perl/t/11-time.t Mon Feb 15 04:24:10 2010
@@ -44,4 +44,4 @@
#
# testing null time
$time = Audio::MPD::Common::Time->new( time => '126:0' );
-is( $time->percent, '0.0', 'percent() defaults to 0' );
+is( $time->percent, '0.0', 'percent() defaults to 0' );
Modified: trunk/libaudio-mpd-common-perl/t/12-status.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/t/12-status.t?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/t/12-status.t (original)
+++ trunk/libaudio-mpd-common-perl/t/12-status.t Mon Feb 15 04:24:10 2010
@@ -47,4 +47,4 @@
is( $s->bitrate, 127, 'accessor: bitrate' );
is( $s->audio, '44100:16:2', 'accessor: audio' );
is( $s->error, 'problems opening audio device', 'accessor: error' );
-is( $s->updating_db, 1, 'accessor: updating_db' );
+is( $s->updating_db, 1, 'accessor: updating_db' );
Modified: trunk/libaudio-mpd-common-perl/t/13-stats.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/t/13-stats.t?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/t/13-stats.t (original)
+++ trunk/libaudio-mpd-common-perl/t/13-stats.t Mon Feb 15 04:24:10 2010
@@ -33,4 +33,4 @@
is( $s->uptime, 10002, 'accessor: uptime' );
is( $s->playtime, 5, 'accessor: playtime' );
is( $s->db_playtime, 8, 'accessor: db_playtime' );
-is( $s->db_update, 1175631570, 'accessor: db_update' );
+is( $s->db_update, 1175631570, 'accessor: db_update' );
Modified: trunk/libaudio-mpd-common-perl/t/author-critic.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-common-perl/t/author-critic.t?rev=52777&op=diff
==============================================================================
--- trunk/libaudio-mpd-common-perl/t/author-critic.t (original)
+++ trunk/libaudio-mpd-common-perl/t/author-critic.t Mon Feb 15 04:24:10 2010
@@ -16,6 +16,9 @@
}
+use strict;
+use warnings;
+
use Test::More;
use English qw(-no_match_vars);
More information about the Pkg-perl-cvs-commits
mailing list