r52701 - in /trunk/libaudio-mpd-perl: ./ bin/ debian/ examples/ lib/Audio/ lib/Audio/MPD/ t/

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Sun Feb 14 01:36:19 UTC 2010


Author: jawnsy-guest
Date: Sun Feb 14 01:36:08 2010
New Revision: 52701

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=52701
Log:
* New upstream release
* Standards-Version 3.8.4 (no changes)
* Add myself to Uploaders and Copyright
* Rewrite control description

Removed:
    trunk/libaudio-mpd-perl/Makefile.PL
Modified:
    trunk/libaudio-mpd-perl/AUTHORS
    trunk/libaudio-mpd-perl/Build.PL
    trunk/libaudio-mpd-perl/Changes
    trunk/libaudio-mpd-perl/MANIFEST
    trunk/libaudio-mpd-perl/META.yml
    trunk/libaudio-mpd-perl/README
    trunk/libaudio-mpd-perl/bin/mpd-dynamic
    trunk/libaudio-mpd-perl/debian/changelog
    trunk/libaudio-mpd-perl/debian/control
    trunk/libaudio-mpd-perl/debian/libaudio-mpd-perl.docs
    trunk/libaudio-mpd-perl/dist.ini
    trunk/libaudio-mpd-perl/examples/example.pl
    trunk/libaudio-mpd-perl/examples/mpc.pl
    trunk/libaudio-mpd-perl/lib/Audio/MPD.pm
    trunk/libaudio-mpd-perl/lib/Audio/MPD/Collection.pm
    trunk/libaudio-mpd-perl/lib/Audio/MPD/Playlist.pm
    trunk/libaudio-mpd-perl/lib/Audio/MPD/Types.pm
    trunk/libaudio-mpd-perl/t/00-compile.t
    trunk/libaudio-mpd-perl/t/20-connection.t
    trunk/libaudio-mpd-perl/t/21-new.t
    trunk/libaudio-mpd-perl/t/22-general.t
    trunk/libaudio-mpd-perl/t/23-output.t
    trunk/libaudio-mpd-perl/t/24-info.t
    trunk/libaudio-mpd-perl/t/25-settings.t
    trunk/libaudio-mpd-perl/t/26-playback.t
    trunk/libaudio-mpd-perl/t/30-collection.t
    trunk/libaudio-mpd-perl/t/40-playlist.t
    trunk/libaudio-mpd-perl/t/author-critic.t

Modified: trunk/libaudio-mpd-perl/AUTHORS
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/AUTHORS?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/AUTHORS (original)
+++ trunk/libaudio-mpd-perl/AUTHORS Sun Feb 14 01:36:08 2010
@@ -1,4 +1,4 @@
-Jerome Quelin <jquelin at cpan.org
+Jerome Quelin <jquelin at cpan.org>
 
 Original authors:
   Tue Abrahamsen <tue.abrahamsen at gmail.com> (code)

Modified: trunk/libaudio-mpd-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/Build.PL?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/Build.PL (original)
+++ trunk/libaudio-mpd-perl/Build.PL Sun Feb 14 01:36:08 2010
@@ -2,41 +2,45 @@
 use strict;
 use warnings;
 
-use Module::Build;
+use Module::Build 0.3601;
 
-my $build = Module::Build->new(
-  module_name   => 'Audio::MPD',
-  license       => 'perl',
-  dist_abstract => "class\ to\ talk\ to\ MPD\ \(Music\ Player\ Daemon\)\ servers",
-  dist_name     => "Audio\-MPD",
-  dist_author   => [
-"Jerome\ Quelin",
-  ],
-  requires      => {
-    "MooseX::Has::Sugar" => '0',
-    "Sub::Exporter" => '0',
-    "Moose::Util::TypeConstraints" => '0',
-    "Encode" => '0',
-    "Audio::MPD::Common::Item" => '0',
-    "File::Find" => '0',
-    "Audio::MPD::Common::Status" => '0',
-    "Audio::MPD::Common::Stats" => '0',
-    "MooseX::SemiAffordanceAccessor" => '0',
-    "Moose" => '0',
-    "English" => '0',
-    "Getopt::Euclid" => '0',
-    "ExtUtils::MakeMaker" => '0',
-    "Data::Dumper" => '0',
-    "DB_File" => '0',
-    "Time::HiRes" => '0',
-    "constant" => '0',
-    "Test::More" => '0',
-    "perl" => '5.008',
-    "Test::Corpus::Audio::MPD" => '1.092920',
-    "IO::Socket" => '0',
-    "Proc::Daemon" => '0',
-  },
-  script_files => [ qw(bin/mpd-dynamic) ],
-);
+my %module_build_args = (
+                       'dist_abstract' => 'class to talk to MPD (Music Player Daemon) servers',
+                       'dist_author' => [
+                                          'Jerome Quelin'
+                                        ],
+                       'dist_name' => 'Audio-MPD',
+                       'script_files' => [
+                                           'bin/mpd-dynamic'
+                                         ],
+                       'module_name' => 'Audio::MPD',
+                       'requires' => {
+                                       'MooseX::Has::Sugar' => 0,
+                                       'Moose::Util::TypeConstraints' => 0,
+                                       'Encode' => 0,
+                                       'Audio::MPD::Common::Item' => 0,
+                                       'File::Find' => 0,
+                                       'Audio::MPD::Common::Status' => 0,
+                                       'Audio::MPD::Common::Stats' => 0,
+                                       'Moose' => 0,
+                                       'MooseX::SemiAffordanceAccessor' => 0,
+                                       'English' => 0,
+                                       'Getopt::Euclid' => 0,
+                                       'Data::Dumper' => 0,
+                                       'DB_File' => 0,
+                                       'Time::HiRes' => 0,
+                                       'constant' => 0,
+                                       'perl' => '5.008',
+                                       'Test::More' => 0,
+                                       'Test::Corpus::Audio::MPD' => '1.092920',
+                                       'IO::Socket' => 0,
+                                       'File::Temp' => 0,
+                                       'Proc::Daemon' => 0
+                                     },
+                       'license' => 'perl'
+                     );
+
+
+my $build = Module::Build->new(%module_build_args);
 
 $build->create_build_script;

Modified: trunk/libaudio-mpd-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/Changes?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/Changes (original)
+++ trunk/libaudio-mpd-perl/Changes Sun Feb 14 01:36:08 2010
@@ -1,6 +1,10 @@
 Changelog for Audio-MPD
 
-1.093170  2009-11-13 18:06:41 UTC
+1.100430  2010-02-12 12:51:18 Europe/Paris
+ - WARNING: no more makefile.pl supplied, only a build.pl
+ - sub::exporter no more used internally
+
+1.093170 Fri Nov 13 19:06:54 2009
  - removed no more used prereq class::accessor
  - revamped pod with podweaver
  - introducing audio::mpd::types

Modified: trunk/libaudio-mpd-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/MANIFEST?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/MANIFEST (original)
+++ trunk/libaudio-mpd-perl/MANIFEST Sun Feb 14 01:36:08 2010
@@ -4,7 +4,6 @@
 LICENSE
 MANIFEST
 META.yml
-Makefile.PL
 README
 TODO
 bin/mpd-dynamic

Modified: trunk/libaudio-mpd-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/META.yml?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/META.yml (original)
+++ trunk/libaudio-mpd-perl/META.yml Sun Feb 14 01:36:08 2010
@@ -2,7 +2,11 @@
 abstract: 'class to talk to MPD (Music Player Daemon) servers'
 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,16 +15,16 @@
 provides:
   Audio::MPD:
     file: lib/Audio/MPD.pm
-    version: 1.093170
+    version: 1.100430
   Audio::MPD::Collection:
     file: lib/Audio/MPD/Collection.pm
-    version: 1.093170
+    version: 1.100430
   Audio::MPD::Playlist:
     file: lib/Audio/MPD/Playlist.pm
-    version: 1.093170
+    version: 1.100430
   Audio::MPD::Types:
     file: lib/Audio/MPD/Types.pm
-    version: 1.093170
+    version: 1.100430
 requires:
   Audio::MPD::Common::Item: 0
   Audio::MPD::Common::Stats: 0
@@ -30,6 +34,7 @@
   Encode: 0
   English: 0
   File::Find: 0
+  File::Temp: 0
   Getopt::Euclid: 0
   IO::Socket: 0
   Moose: 0
@@ -37,7 +42,6 @@
   MooseX::Has::Sugar: 0
   MooseX::SemiAffordanceAccessor: 0
   Proc::Daemon: 0
-  Sub::Exporter: 0
   Test::Corpus::Audio::MPD: 1.092920
   Test::More: 0
   Time::HiRes: 0
@@ -47,4 +51,4 @@
   MailingList: http://groups.google.com/group/audio-mpd
   homepage: http://search.cpan.org/dist/Audio-MPD
   repository: http://github.com/jquelin/audio-mpd
-version: 1.093170
+version: 1.100430

Modified: trunk/libaudio-mpd-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/README?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/README (original)
+++ trunk/libaudio-mpd-perl/README Sun Feb 14 01:36:08 2010
@@ -1,7 +1,7 @@
 
 
 This archive contains the distribution Audio-MPD, version
-1.093170:
+1.100430:
 
   class to talk to MPD (Music Player Daemon) servers
 

Modified: trunk/libaudio-mpd-perl/bin/mpd-dynamic
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/bin/mpd-dynamic?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/bin/mpd-dynamic (original)
+++ trunk/libaudio-mpd-perl/bin/mpd-dynamic Sun Feb 14 01:36:08 2010
@@ -246,4 +246,4 @@
 This program is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.
 
-=cut
+=cut

Modified: trunk/libaudio-mpd-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/debian/changelog?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/debian/changelog (original)
+++ trunk/libaudio-mpd-perl/debian/changelog Sun Feb 14 01:36:08 2010
@@ -1,15 +1,17 @@
-libaudio-mpd-perl (1.093170-1) UNRELEASED; urgency=low
+libaudio-mpd-perl (1.100430-1) UNRELEASED; urgency=low
 
-  WAITS-FOR: Test::Corpus::Audio::MPD 1.092920
-  
-  NOTE: the tests should be skipped without Test::Corpus::Audio::MPD but that
-  doesn't work ...
+  [ Jonathan Yu ]
+  * New upstream release
+  * Standards-Version 3.8.4 (no changes)
+  * Add myself to Uploaders and Copyright
+  * Rewrite control description
 
+  [ gregor herrmann ]
   * New upstream release.
   * debian/copyright: adjust years of upstream copyright.
   * debian/control: update dependencies as per upstream changes.
 
- -- gregor herrmann <gregoa at debian.org>  Sat, 14 Nov 2009 18:14:43 +0100
+ -- Jonathan Yu <jawnsy at cpan.org>  Sat, 13 Feb 2010 20:51:05 -0500
 
 libaudio-mpd-perl (0.19.7-1) unstable; urgency=low
 

Modified: trunk/libaudio-mpd-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/debian/control?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/debian/control (original)
+++ trunk/libaudio-mpd-perl/debian/control Sun Feb 14 01:36:08 2010
@@ -2,16 +2,15 @@
 Section: perl
 Priority: optional
 Build-Depends: debhelper (>= 7.0.50)
-Build-Depends-Indep: perl,
- libaudio-mpd-common-perl, libmoose-perl, libmoosex-has-sugar-perl,
- libmoosex-semiaffordanceaccessor-perl,
- libtest-pod-perl, libtest-pod-coverage-perl, libtest-cpan-meta-perl
+Build-Depends-Indep: perl, libaudio-mpd-common-perl, libtest-cpan-meta-perl,
+ libmoose-perl, libmoosex-semiaffordanceaccessor-perl, libtest-pod-perl,
+ libmoosex-has-sugar-perl, libtest-pod-coverage-perl
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Damyan Ivanov <dmn at debian.org>,
+Uploaders: Damyan Ivanov <dmn at debian.org>, Jonathan Yu <jawnsy at cpan.org>,
  Rene Mayorga <rmayorga at debian.org.sv>, gregor herrmann <gregoa at debian.org>,
  Franck Joncourt <franck.mail at dthconnex.com>, 
  Jose Luis Rivas <ghostbar at debian.org>
-Standards-Version: 3.8.3
+Standards-Version: 3.8.4
 Homepage: http://search.cpan.org/dist/Audio-MPD/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libaudio-mpd-perl/
 Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libaudio-mpd-perl/
@@ -23,9 +22,8 @@
  libmoosex-semiaffordanceaccessor-perl
 Recommends: libgetopt-euclid-perl, libproc-daemon-perl
 Suggests: mpd
-Description: Perl module to communicate with MPD servers from perl
- Audio::MPD provides an object-oriented interface to talking to and
- controlling MPD (Music Player Daemon) servers.
- .
- This package also includes a daemon, mpd-dynamic, that implements
- a dynamic playlist for MPD.
+Description: module to communicate with MPD servers
+ Audio::MPD is a Perl module that provides an object-oriented interface for
+ communicating with and controlling MPD (Music Player Daemon) servers. It also
+ includes an example control daemon, mpd-dynamic, which implements a dynamic
+ playlist for MPD.

Modified: trunk/libaudio-mpd-perl/debian/libaudio-mpd-perl.docs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/debian/libaudio-mpd-perl.docs?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/debian/libaudio-mpd-perl.docs (original)
+++ trunk/libaudio-mpd-perl/debian/libaudio-mpd-perl.docs Sun Feb 14 01:36:08 2010
@@ -1,1 +1,2 @@
-TODO AUTHORS
+TODO
+AUTHORS

Modified: trunk/libaudio-mpd-perl/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/dist.ini?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/dist.ini (original)
+++ trunk/libaudio-mpd-perl/dist.ini Sun Feb 14 01:36:08 2010
@@ -4,71 +4,13 @@
 copyright_holder = Jerome Quelin
 copyright_year   = 2007
 
-
 ; -- static meta-information
-
 [MetaResources]
 homepage    = http://search.cpan.org/dist/Audio-MPD
 repository  = http://github.com/jquelin/audio-mpd
 MailingList = http://groups.google.com/group/audio-mpd
 
-[AutoVersion]
-major  = 1
-format = {{ $major }}.{{ cldr('yyDDD') }}{{ sprintf '%01u', ($ENV{N} || 0) }}
+[Prereq]
+Test::Corpus::Audio::MPD = 1.092920    ; used for tests, conditional compilation
 
-
-; -- fetch & generate files
-
-[AllFiles]
-
-[CompileTests]
-[CriticTests]
-[MetaTests]
-[PodTests]
-
-
-; -- remove files
-
-[PruneCruft]
-[ManifestSkip]
-
-
-; -- get prereqs
-
-[AutoPrereq]
-[Prereq]
-; used for tests, conditional compilation
-Test::Corpus::Audio::MPD   = 1.092920
-
-
-; -- 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-perl/examples/example.pl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/examples/example.pl?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/examples/example.pl (original)
+++ trunk/libaudio-mpd-perl/examples/example.pl Sun Feb 14 01:36:08 2010
@@ -44,4 +44,4 @@
 my $foo = $x->get_time_info;
 print "Current song info: \n";
 print "Minutes: ".$foo->{'minutes_so_far'}."\n";
-print "Seconds: ".$foo->{'seconds_so_far'}."\n";
+print "Seconds: ".$foo->{'seconds_so_far'}."\n";

Modified: trunk/libaudio-mpd-perl/examples/mpc.pl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/examples/mpc.pl?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/examples/mpc.pl (original)
+++ trunk/libaudio-mpd-perl/examples/mpc.pl Sun Feb 14 01:36:08 2010
@@ -223,4 +223,4 @@
 }
 
 # Let's start!
-main;
+main;

Modified: trunk/libaudio-mpd-perl/lib/Audio/MPD.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/lib/Audio/MPD.pm?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/lib/Audio/MPD.pm (original)
+++ trunk/libaudio-mpd-perl/lib/Audio/MPD.pm Sun Feb 14 01:36:08 2010
@@ -11,9 +11,7 @@
 use strict;
 
 package Audio::MPD;
-our $VERSION = '1.093170';
-
-
+our $VERSION = '1.100430';
 # ABSTRACT: class to talk to MPD (Music Player Daemon) servers
 
 use Audio::MPD::Collection;
@@ -452,7 +450,7 @@
 
 =head1 VERSION
 
-version 1.093170
+version 1.100430
 
 =head1 SYNOPSIS
 
@@ -690,15 +688,26 @@
 Original code (2005) by Tue Abrahamsen C<< <tue.abrahamsen at gmail.com> >>,
 documented in 2006 by Nicholas J. Humfrey C<< <njh at aelius.com> >>.
 
-L<Audio::MPD> development takes place on <audio-mpd at googlegroups.com>:
-feel free to join us. (use L<http://groups.google.com/group/audio-mpd>
-to sign in). Our git repository is located at
-L<http://github.com/jquelin/audio-mpd.git>.
-
-You can also look for information on this module at:
+You can look for information on this module at:
 
 =over 4
 
+=item * Search CPAN
+
+L<http://search.cpan.org/dist/Audio-MPD>
+
+=item * See open / report bugs
+
+L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Audio-MPD>
+
+=item * Mailing-list
+
+L<http://groups.google.com/group/audio-mpd>
+
+=item * Git repository
+
+L<http://github.com/jquelin/audio-mpd.git>
+
 =item * AnnoCPAN: Annotated CPAN documentation
 
 L<http://annocpan.org/dist/Audio-MPD>
@@ -706,10 +715,6 @@
 =item * CPAN Ratings
 
 L<http://cpanratings.perl.org/d/Audio-MPD>
-
-=item * Open bugs
-
-L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Audio-MPD>
 
 =back
 
@@ -727,4 +732,5 @@
 =cut
 
 
-__END__
+__END__
+

Modified: trunk/libaudio-mpd-perl/lib/Audio/MPD/Collection.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/lib/Audio/MPD/Collection.pm?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/lib/Audio/MPD/Collection.pm (original)
+++ trunk/libaudio-mpd-perl/lib/Audio/MPD/Collection.pm Sun Feb 14 01:36:08 2010
@@ -11,9 +11,7 @@
 use strict;
 
 package Audio::MPD::Collection;
-our $VERSION = '1.093170';
-
-
+our $VERSION = '1.100430';
 # ABSTRACT: class to query MPD's collection
 
 use Moose;
@@ -219,7 +217,7 @@
 
 =head1 VERSION
 
-version 1.093170
+version 1.100430
 
 =head1 SYNOPSIS
 
@@ -355,4 +353,5 @@
 =cut
 
 
-__END__
+__END__
+

Modified: trunk/libaudio-mpd-perl/lib/Audio/MPD/Playlist.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/lib/Audio/MPD/Playlist.pm?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/lib/Audio/MPD/Playlist.pm (original)
+++ trunk/libaudio-mpd-perl/lib/Audio/MPD/Playlist.pm Sun Feb 14 01:36:08 2010
@@ -11,9 +11,7 @@
 use strict;
 
 package Audio::MPD::Playlist;
-our $VERSION = '1.093170';
-
-
+our $VERSION = '1.100430';
 # ABSTRACT: class to mess MPD's playlist
 
 use Moose;
@@ -194,7 +192,7 @@
 
 =head1 VERSION
 
-version 1.093170
+version 1.100430
 
 =head1 SYNOPSIS
 
@@ -303,4 +301,5 @@
 =cut
 
 
-__END__
+__END__
+

Modified: trunk/libaudio-mpd-perl/lib/Audio/MPD/Types.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/lib/Audio/MPD/Types.pm?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/lib/Audio/MPD/Types.pm (original)
+++ trunk/libaudio-mpd-perl/lib/Audio/MPD/Types.pm Sun Feb 14 01:36:08 2010
@@ -11,14 +11,10 @@
 use strict;
 
 package Audio::MPD::Types;
-our $VERSION = '1.093170';
-
-
+our $VERSION = '1.100430';
 # ABSTRACT: types used in the distribution
 
 use Moose::Util::TypeConstraints;
-use Sub::Exporter;
-use Sub::Exporter -setup => { exports => [ qw{ CONNTYPE } ] };
 
 enum CONNTYPE  => qw{ reuse once };
 
@@ -33,15 +29,15 @@
 
 =head1 VERSION
 
-version 1.093170
+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 directly by
+L<Moose::Util::TypeConstraints>.
 
-Current types defined and exported:
+Current types defined:
 
 =over 4
 
@@ -64,4 +60,5 @@
 =cut
 
 
-__END__
+__END__
+

Modified: trunk/libaudio-mpd-perl/t/00-compile.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/00-compile.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/00-compile.t (original)
+++ trunk/libaudio-mpd-perl/t/00-compile.t Sun Feb 14 01:36:08 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-perl/t/20-connection.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/20-connection.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/20-connection.t (original)
+++ trunk/libaudio-mpd-perl/t/20-connection.t Sun Feb 14 01:36:08 2010
@@ -70,4 +70,5 @@
 # testing _cooked_command_strip_first_field
 my @list = $mpd->_cooked_command_strip_first_field( "stats\n" );
 unlike( $_, qr/\D/, '_cooked_command_strip_first_field return only 2nd field' ) for @list;
-# stats return numerical data as second field.
+# stats return numerical data as second field.
+

Modified: trunk/libaudio-mpd-perl/t/21-new.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/21-new.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/21-new.t (original)
+++ trunk/libaudio-mpd-perl/t/21-new.t Sun Feb 14 01:36:08 2010
@@ -78,4 +78,4 @@
 $mpd->ping;
 $mpd->ping;
 $mpd->ping;
-isa_ok( $mpd->_socket, 'IO::Socket', 'socket is created and retained' );
+isa_ok( $mpd->_socket, 'IO::Socket', 'socket is created and retained' );

Modified: trunk/libaudio-mpd-perl/t/22-general.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/22-general.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/22-general.t (original)
+++ trunk/libaudio-mpd-perl/t/22-general.t Sun Feb 14 01:36:08 2010
@@ -62,4 +62,4 @@
 #
 # testing urlhandlers.
 my @handlers = $mpd->urlhandlers;
-is( scalar @handlers, 1, 'only one url handler supported' );
+is( scalar @handlers, 1, 'only one url handler supported' );

Modified: trunk/libaudio-mpd-perl/t/23-output.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/23-output.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/23-output.t (original)
+++ trunk/libaudio-mpd-perl/t/23-output.t Sun Feb 14 01:36:08 2010
@@ -61,4 +61,5 @@
 $mpd->output_enable(0);
 sleep(1);
 $mpd->play; $mpd->pause;
-is( $mpd->status->error, undef, 'enabling output' );
+is( $mpd->status->error, undef, 'enabling output' );
+

Modified: trunk/libaudio-mpd-perl/t/24-info.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/24-info.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/24-info.t (original)
+++ trunk/libaudio-mpd-perl/t/24-info.t Sun Feb 14 01:36:08 2010
@@ -68,4 +68,4 @@
 isa_ok( $song, 'Audio::MPD::Common::Item::Song', 'songid() returns an AMC::Item::Song object' );
 is( $song->file, 'dir1/title-artist-album.ogg', 'songid() returns the wanted song' );
 $song = $mpd->songid; # default to current song
-is( $song->file, 'title.ogg', 'songid() defaults to current song' );
+is( $song->file, 'title.ogg', 'songid() defaults to current song' );

Modified: trunk/libaudio-mpd-perl/t/25-settings.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/25-settings.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/25-settings.t (original)
+++ trunk/libaudio-mpd-perl/t/25-settings.t Sun Feb 14 01:36:08 2010
@@ -51,4 +51,5 @@
 $mpd->fade(15);
 is( $mpd->status->xfade, 15, 'enabling fading' );
 $mpd->fade;
-is( $mpd->status->xfade,  0, 'disabling fading by default' );
+is( $mpd->status->xfade,  0, 'disabling fading by default' );
+

Modified: trunk/libaudio-mpd-perl/t/26-playback.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/26-playback.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/26-playback.t (original)
+++ trunk/libaudio-mpd-perl/t/26-playback.t Sun Feb 14 01:36:08 2010
@@ -92,4 +92,5 @@
     is( $mpd->status->time->sofar_secs, 0, 'seekid() defaults to beginning of song' );
     $mpd->seekid(1);
     is( $mpd->status->time->sofar_secs, 1, 'seekid() defaults to current song' );
-}
+}
+

Modified: trunk/libaudio-mpd-perl/t/30-collection.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/30-collection.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/30-collection.t (original)
+++ trunk/libaudio-mpd-perl/t/30-collection.t Sun Feb 14 01:36:08 2010
@@ -181,4 +181,5 @@
 @list = $coll->songs_with_title_partial( 'title' );
 is( scalar @list, 3, 'songs_with_title_partial return all the songs found' );
 isa_ok( $_, 'Audio::MPD::Common::Item::Song', 'songs_with_title_partial return AMCI::Songs' ) for @list;
-like( $list[0]->title, qr/title/, 'songs_with_title_partial return correct objects' );
+like( $list[0]->title, qr/title/, 'songs_with_title_partial return correct objects' );
+

Modified: trunk/libaudio-mpd-perl/t/40-playlist.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/40-playlist.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/40-playlist.t (original)
+++ trunk/libaudio-mpd-perl/t/40-playlist.t Sun Feb 14 01:36:08 2010
@@ -174,4 +174,5 @@
 #
 # testing rm.
 $pl->rm( 'test-jq' );
-ok( ! -f "$pdir/test-jq.m3u", 'rm() removes a playlist' );
+ok( ! -f "$pdir/test-jq.m3u", 'rm() removes a playlist' );
+

Modified: trunk/libaudio-mpd-perl/t/author-critic.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaudio-mpd-perl/t/author-critic.t?rev=52701&op=diff
==============================================================================
--- trunk/libaudio-mpd-perl/t/author-critic.t (original)
+++ trunk/libaudio-mpd-perl/t/author-critic.t Sun Feb 14 01:36:08 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