r77571 - in /trunk/libacme-poe-knee-perl: Changes Changes.old LICENSE MANIFEST META.json META.yml Makefile.PL README debian/changelog demo_race.pl demo_simple.pl dist.ini examples/ lib/Acme/POE/Knee.pm t/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Sun Jul 17 18:24:35 UTC 2011
Author: jawnsy-guest
Date: Sun Jul 17 18:24:34 2011
New Revision: 77571
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=77571
Log:
Change to Dist::Zilla build system
IGNORE-VERSION: 1.12-1
* New upstream release
Added:
trunk/libacme-poe-knee-perl/Changes.old
- copied unchanged from r77570, branches/upstream/libacme-poe-knee-perl/current/Changes.old
trunk/libacme-poe-knee-perl/LICENSE
- copied unchanged from r77570, branches/upstream/libacme-poe-knee-perl/current/LICENSE
trunk/libacme-poe-knee-perl/META.json
- copied unchanged from r77570, branches/upstream/libacme-poe-knee-perl/current/META.json
trunk/libacme-poe-knee-perl/META.yml
- copied unchanged from r77570, branches/upstream/libacme-poe-knee-perl/current/META.yml
trunk/libacme-poe-knee-perl/dist.ini
- copied unchanged from r77570, branches/upstream/libacme-poe-knee-perl/current/dist.ini
trunk/libacme-poe-knee-perl/examples/
- copied from r77570, branches/upstream/libacme-poe-knee-perl/current/examples/
trunk/libacme-poe-knee-perl/t/
- copied from r77570, branches/upstream/libacme-poe-knee-perl/current/t/
Removed:
trunk/libacme-poe-knee-perl/demo_race.pl
trunk/libacme-poe-knee-perl/demo_simple.pl
Modified:
trunk/libacme-poe-knee-perl/Changes
trunk/libacme-poe-knee-perl/MANIFEST
trunk/libacme-poe-knee-perl/Makefile.PL
trunk/libacme-poe-knee-perl/README
trunk/libacme-poe-knee-perl/debian/changelog
trunk/libacme-poe-knee-perl/lib/Acme/POE/Knee.pm
Modified: trunk/libacme-poe-knee-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libacme-poe-knee-perl/Changes?rev=77571&op=diff
==============================================================================
--- trunk/libacme-poe-knee-perl/Changes (original)
+++ trunk/libacme-poe-knee-perl/Changes Sun Jul 17 18:24:34 2011
@@ -1,16 +1,16 @@
-Revision history for Perl extension Acme::POE::Knee
-
-1.10 Thu Aug 23 15:40:45 2001
- - changed the way delay works:
- there's no longer generic delay for ponies,
- but you can specify maximum delay per pony now.
-
-1.02 Tue Aug 14 15:43:21 2001
- - touched up the POD upon request
-
-1.01 Tue Aug 14 10:19:43 2001
- - small cosmetic changes
-
-1.00 Mon Aug 13 10:41:16 2001
- - original version
-
+==============================
+2011-07-13 12:19:01 +0100 1.12
+==============================
+
+ commit 17a487d54656d22457886bff22b0f56f1a4a9cd5
+ Author: Chris 'BinGOs' Williams <chris at bingosnet.co.uk>
+ Date: Wed Jul 13 12:12:40 2011 +0100
+
+ Change build system to dzil, added POE as a PREREQ
+
+ Addresses [rt.cpan.org #69430] "Missing dependeny: POE.pm" reported
+ by Tommy Stanton
+
+====================================
+End of changes in the last 1825 days
+====================================
Modified: trunk/libacme-poe-knee-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libacme-poe-knee-perl/MANIFEST?rev=77571&op=diff
==============================================================================
--- trunk/libacme-poe-knee-perl/MANIFEST (original)
+++ trunk/libacme-poe-knee-perl/MANIFEST Sun Jul 17 18:24:34 2011
@@ -1,7 +1,15 @@
Changes
+Changes.old
+LICENSE
MANIFEST
+META.json
+META.yml
Makefile.PL
README
-demo_race.pl
-demo_simple.pl
-lib/Acme/POE/Knee.pm
+dist.ini
+examples/demo_race.pl
+examples/demo_simple.pl
+lib/Acme/POE/Knee.pm
+t/00-compile.t
+t/release-pod-coverage.t
+t/release-pod-syntax.t
Modified: trunk/libacme-poe-knee-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libacme-poe-knee-perl/Makefile.PL?rev=77571&op=diff
==============================================================================
--- trunk/libacme-poe-knee-perl/Makefile.PL (original)
+++ trunk/libacme-poe-knee-perl/Makefile.PL Sun Jul 17 18:24:34 2011
@@ -1,5 +1,53 @@
-use ExtUtils::MakeMaker;
-WriteMakefile(
- NAME => 'Acme::POE::Knee',
- VERSION => '1.10',
- );
+
+use strict;
+use warnings;
+
+use 5.006000;
+
+use ExtUtils::MakeMaker 6.30;
+
+
+
+my %WriteMakefileArgs = (
+ 'ABSTRACT' => 'Time sliced pony race using the POE kernel.',
+ 'AUTHOR' => 'Jos Boumans <kane at cpan.org>, Rocco Caputo <rcaputo at cpan.org>',
+ 'BUILD_REQUIRES' => {
+ 'Test::More' => '0.47'
+ },
+ 'CONFIGURE_REQUIRES' => {
+ 'ExtUtils::MakeMaker' => '6.30'
+ },
+ 'DISTNAME' => 'Acme-POE-Knee',
+ 'EXE_FILES' => [],
+ 'LICENSE' => 'perl',
+ 'NAME' => 'Acme::POE::Knee',
+ 'PREREQ_PM' => {
+ 'POE' => '0'
+ },
+ 'VERSION' => '1.12',
+ 'test' => {
+ 'TESTS' => 't/*.t'
+ }
+);
+
+
+unless ( eval { ExtUtils::MakeMaker->VERSION(6.56) } ) {
+ my $br = delete $WriteMakefileArgs{BUILD_REQUIRES};
+ my $pp = $WriteMakefileArgs{PREREQ_PM};
+ for my $mod ( keys %$br ) {
+ if ( exists $pp->{$mod} ) {
+ $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod};
+ }
+ else {
+ $pp->{$mod} = $br->{$mod};
+ }
+ }
+}
+
+delete $WriteMakefileArgs{CONFIGURE_REQUIRES}
+ unless eval { ExtUtils::MakeMaker->VERSION(6.52) };
+
+WriteMakefile(%WriteMakefileArgs);
+
+
+
Modified: trunk/libacme-poe-knee-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libacme-poe-knee-perl/README?rev=77571&op=diff
==============================================================================
--- trunk/libacme-poe-knee-perl/README (original)
+++ trunk/libacme-poe-knee-perl/README Sun Jul 17 18:24:34 2011
@@ -1,122 +1,108 @@
-NAME
- Acme::POE::Knee - Time sliced pony race using the POE kernel.
-
-REQUIREMENTS
- Acme::POE::Knee requires the POE module to run. You can get that as well
- from CPAN or look at poe.sourceforge.net
-
-SYNOPSIS
- #!/usr/bin/perl -w
- use strict;
-
- # Use POEny!
- use Acme::POE::Knee;
-
- # Every Acme::POE::Knee race will require a set of arguments.
- # There are defaults but it's just more fun to set these
- # yourselves. We set a distance the ponies must run and of course
- # we name our race ponies! You'll have to specify the maximum
- # delay a pony can have before reaching the next stage.
- # The lower the delay, the higher the chances are the pony will
- # win the race.
-
- my $pony = new Acme::POE::Knee (
- dist => 20,
- ponies => {
- 'dngor' => 5,
- 'Abigail' => 5.2,
- 'Co-Kane' => 5.4,
- 'MJD' => 5.6,
- 'acme' => 5.8,
- },
- );
-
- # start the race
- $pony->race( );
-
- exit;
-
-QUICK LINKS
- Please see the samples directory in POE's distribution for several
- well-commented sample and tutorial programs.
-
- Please see <http://www.perl.com/pub/2001/01/poe.html> for an excellent,
- and more importantly: gradual, introduction to POE.
-
-DESCRIPTION
- POE::Knee is an acronym of "Pony". We all like ponies. And wouldn't we
- love to race ponies? Well, that's what Acme::POE::Knee is for!
-
- It's great for those friday afternoons at the office, where you wonder
- who will pay the beer tab. Whoever 'wins' the race, loses!
-
- You specify a distance the ponies must run, and a maximum delay before
- the pony will reach the next step. So, the bigger the delay, the bigger
- the distance between multiple ponies can be.
-
- Of course this wouldn't be any fun if we couldn't name the ponies
- ourselves. Here, we simply put all our race ponies in an array reference
- and the Acme::POE::Knee module will take care of the rest.
-
-USING Acme::POE::Knee
- Using Acme::POE::Knee is really easy. This simple progam would already
- suffice:
-
- use strict;
- use Acme::POE::Knee;
-
- my $pony = new Acme::POE::Knee;
- $pony->race();
- exit;
-
- This will use the defaults of the POE::Knee module, but you can of
- course specify your own arguments, as shown in the synopsis.
-
-The Use of Acme::POE::Knee
- Use, yes... Usefull? Probably not. This was written in responce to a
- rather persistant meme on #perl (you know who you are!). Basicly, we all
- wanted ponies. Well folks, here it is.
-
- It's source might be interesting to look at for newcomers to POE to see
- how this time slicing works.
-
-Learning more about POE
- The POE Mailing List
- POE has a mailing list at perl.org. You can receive subscription
- information by sending e-mail:
-
- To: poe-help at perl.org
- Subject: (anything will do)
-
- The message body is ignored.
-
- All forms of feedback are welcome.
-
- The POE Web Site
- POE has a web site where the latest development snapshot, along with
- the Changes file and other stuff may be found: <http://poe.perl.org/>
-
- SourceForge
- POE's development has moved to SourceForge as an experiment in project
- management. You can reach POE's project summary page at
- <http://sourceforge.net/projects/poe/>.
-
- Author
-
- Jos Boumans
- Jos Boumans is <kane_at_cpan.org>. POE::Knee is his brainchild.
-
- Rocco Caputo
- Rocco Caputo is <troc+poe at netrus.net>. POE itself is his creation.
-
- COPYRIGHT
-
- Copyright (c) 2001, Jos Boumans. All Rights Reserved. This module is
- free software. It may be used, redistributed and/or modified under the
- terms of the Perl Artistic License (see
- http://www.perl.com/perl/misc/Artistic.html)
-
- Except where otherwise noted, POE is Copyright 1998-2001 Rocco Caputo.
- All rights reserved. POE is free software; you may redistribute it
- and/or modify it under the same terms as Perl itself.
-
+NAME
+ Acme::POE::Knee - Time sliced pony race using the POE kernel.
+
+VERSION
+ version 1.12
+
+SYNOPSIS
+ #!/usr/bin/perl -w
+ use strict;
+
+ # Use POEny!
+ use Acme::POE::Knee;
+
+ # Every Acme::POE::Knee race will require a set of arguments.
+ # There are defaults but it's just more fun to set these
+ # yourselves. We set a distance the ponies must run and of course
+ # we name our race ponies! You'll have to specify the maximum
+ # delay a pony can have before reaching the next stage.
+ # The lower the delay, the higher the chances are the pony will
+ # win the race.
+
+ my $pony = new Acme::POE::Knee (
+ dist => 20,
+ ponies => {
+ 'dngor' => 5,
+ 'Abigail' => 5.2,
+ 'Co-Kane' => 5.4,
+ 'MJD' => 5.6,
+ 'acme' => 5.8,
+ },
+ );
+
+ # start the race
+ $pony->race( );
+
+ exit;
+
+DESCRIPTION
+ POE::Knee is an acronym of "Pony". We all like ponies. And wouldn't we
+ love to race ponies? Well, that's what Acme::POE::Knee is for!
+
+ It's great for those friday afternoons at the office, where you wonder
+ who will pay the beer tab. Whoever 'wins' the race, loses!
+
+ You specify a distance the ponies must run, and a maximum delay before
+ the pony will reach the next step. So, the bigger the delay, the bigger
+ the distance between multiple ponies can be.
+
+ Of course this wouldn't be any fun if we couldn't name the ponies
+ ourselves. Here, we simply put all our race ponies in an array reference
+ and the Acme::POE::Knee module will take care of the rest.
+
+QUICK LINKS
+ Please see the samples directory in POE's distribution for several
+ well-commented sample and tutorial programs.
+
+ Please see <http://www.perl.com/pub/2001/01/poe.html> for an excellent,
+ and more importantly: gradual, introduction to POE.
+
+USING Acme::POE::Knee
+ Using Acme::POE::Knee is really easy. This simple progam would already
+ suffice:
+
+ use strict;
+ use Acme::POE::Knee;
+
+ my $pony = new Acme::POE::Knee;
+ $pony->race();
+ exit;
+
+ This will use the defaults of the POE::Knee module, but you can of
+ course specify your own arguments, as shown in the synopsis.
+
+The Use of Acme::POE::Knee
+ Use, yes... Usefull? Probably not. This was written in response to a
+ rather persistant meme on #perl (you know who you are!). Basicly, we all
+ wanted ponies. Well folks, here it is.
+
+ Its source might be interesting to look at for newcomers to POE to see
+ how this time slicing works.
+
+Learning more about POE
+ The POE Mailing List
+ POE has a mailing list at perl.org. You can receive subscription
+ information by sending e-mail:
+
+ To: poe-help at perl.org
+ Subject: (anything will do)
+
+ The message body is ignored.
+
+ All forms of feedback are welcome.
+
+ The POE Web Site
+ POE has a web site where the latest development snapshot, along with
+ the Changes file and other stuff may be found: <http://poe.perl.org/>
+
+AUTHORS
+ * Jos Boumans <kane at cpan.org>
+
+ * Rocco Caputo <rcaputo at cpan.org>
+
+COPYRIGHT AND LICENSE
+ This software is copyright (c) 2011 by Jos Boumans.
+
+ This is free software; you can redistribute it and/or modify it under
+ the same terms as the Perl 5 programming language system itself.
+
Modified: trunk/libacme-poe-knee-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libacme-poe-knee-perl/debian/changelog?rev=77571&op=diff
==============================================================================
--- trunk/libacme-poe-knee-perl/debian/changelog (original)
+++ trunk/libacme-poe-knee-perl/debian/changelog Sun Jul 17 18:24:34 2011
@@ -1,4 +1,7 @@
-libacme-poe-knee-perl (1.10-8) UNRELEASED; urgency=low
+libacme-poe-knee-perl (1.12-1) UNRELEASED; urgency=low
+
+ Change to Dist::Zilla build system
+ IGNORE-VERSION: 1.12-1
[ gregor herrmann ]
* debian/rules: switch order of arguments to dh.
@@ -7,7 +10,10 @@
* Update my email address.
* Update my email address.
- -- gregor herrmann <gregoa at debian.org> Wed, 28 Jul 2010 14:32:07 -0400
+ [ Jonathan Yu ]
+ * New upstream release
+
+ -- Jonathan Yu <jawnsy at cpan.org> Sun, 17 Jul 2011 14:51:29 -0400
libacme-poe-knee-perl (1.10-7) unstable; urgency=low
Modified: trunk/libacme-poe-knee-perl/lib/Acme/POE/Knee.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libacme-poe-knee-perl/lib/Acme/POE/Knee.pm?rev=77571&op=diff
==============================================================================
--- trunk/libacme-poe-knee-perl/lib/Acme/POE/Knee.pm (original)
+++ trunk/libacme-poe-knee-perl/lib/Acme/POE/Knee.pm Sun Jul 17 18:24:34 2011
@@ -1,9 +1,12 @@
package Acme::POE::Knee;
+BEGIN {
+ $Acme::POE::Knee::VERSION = '1.12';
+}
+
+#ABSTRACT: Time sliced pony race using the POE kernel.
+
use strict;
use POE;
-use vars qw($VERSION);
-
-$VERSION = "1.10";
sub new {
my $class = shift;
@@ -13,12 +16,12 @@
dist => 10,
ponies => {
'dngor' => 5,
- 'Abigail' => 5.2,
- 'Co-Kane' => 5.4,
+ 'Abigail' => 5.2,
+ 'Co-Kane' => 5.4,
'MJD' => 5.6,
- 'acme' => 5.8,
+ 'acme' => 5.8,
},
- };
+ };
### check for wrong input ###
for my $key ( keys %args ) {
@@ -44,16 +47,16 @@
sub ponies { my $self = shift; $self->{ponies} }
return $self;
-
+
}
sub _start {
my ($kernel, $heap, $name, $delay, $dist) = @_[KERNEL, HEAP, ARG0, ARG1, ARG2];
-
+
$heap->{name} = $name;
$heap->{delay} = $delay;
$heap->{dist} = $dist;
-
+
printf "Starting pony %10s\n", $heap->{name};
$kernel->delay_add( run => rand($heap->{delay}) );
}
@@ -70,8 +73,8 @@
for my $name (@{[keys %{$self->ponies()}]} ) {
- POE::Session->create (
- inline_states => {
+ POE::Session->create (
+ inline_states => {
_start => \&_start,
run => \&run,
},
@@ -81,20 +84,19 @@
$poe_kernel->run();
}
-1;
+q[POE::Knee!];
+
__END__
+=pod
=head1 NAME
Acme::POE::Knee - Time sliced pony race using the POE kernel.
-
-=head1 REQUIREMENTS
-
- Acme::POE::Knee requires the POE module to run. You can get that as well
- from CPAN or look at poe.sourceforge.net
-
+=head1 VERSION
+
+version 1.12
=head1 SYNOPSIS
@@ -104,39 +106,29 @@
# Use POEny!
use Acme::POE::Knee;
- # Every Acme::POE::Knee race will require a set of arguments.
- # There are defaults but it's just more fun to set these
- # yourselves. We set a distance the ponies must run and of course
- # we name our race ponies! You'll have to specify the maximum
+ # Every Acme::POE::Knee race will require a set of arguments.
+ # There are defaults but it's just more fun to set these
+ # yourselves. We set a distance the ponies must run and of course
+ # we name our race ponies! You'll have to specify the maximum
# delay a pony can have before reaching the next stage.
- # The lower the delay, the higher the chances are the pony will
+ # The lower the delay, the higher the chances are the pony will
# win the race.
my $pony = new Acme::POE::Knee (
- dist => 20,
+ dist => 20,
ponies => {
'dngor' => 5,
- 'Abigail' => 5.2,
- 'Co-Kane' => 5.4,
+ 'Abigail' => 5.2,
+ 'Co-Kane' => 5.4,
'MJD' => 5.6,
- 'acme' => 5.8,
+ 'acme' => 5.8,
},
);
-
+
# start the race
$pony->race( );
-
+
exit;
-
-
-=head1 QUICK LINKS
-
-Please see the samples directory in POE's distribution for several
-well-commented sample and tutorial programs.
-
-Please see <http://www.perl.com/pub/2001/01/poe.html> for an excellent,
-and more importantly: gradual, introduction to POE.
-
=head1 DESCRIPTION
@@ -154,6 +146,19 @@
ourselves. Here, we simply put all our race ponies in an array
reference and the Acme::POE::Knee module will take care of the rest.
+=for Pod::Coverage new
+ race
+ dist
+ ponies
+ run
+
+=head1 QUICK LINKS
+
+Please see the samples directory in POE's distribution for several
+well-commented sample and tutorial programs.
+
+Please see <http://www.perl.com/pub/2001/01/poe.html> for an excellent,
+and more importantly: gradual, introduction to POE.
=head1 USING Acme::POE::Knee
@@ -170,17 +175,15 @@
This will use the defaults of the POE::Knee module, but you can of
course specify your own arguments, as shown in the synopsis.
-
=head1 The Use of Acme::POE::Knee
-Use, yes... Usefull? Probably not. This was written in responce to a
+Use, yes... Usefull? Probably not. This was written in response to a
rather persistant meme on #perl (you know who you are!).
Basicly, we all wanted ponies.
Well folks, here it is.
-It's source might be interesting to look at for newcomers to POE to see
+Its source might be interesting to look at for newcomers to POE to see
how this time slicing works.
-
=head1 Learning more about POE
@@ -203,37 +206,28 @@
POE has a web site where the latest development snapshot, along with
the Changes file and other stuff may be found: <http://poe.perl.org/>
-=item SourceForge
-
-POE's development has moved to SourceForge as an experiment in project
-management. You can reach POE's project summary page at
-<http://sourceforge.net/projects/poe/>.
-
=back
-=head2 Author
-
-=over 2
-
-=item Jos Boumans
-
-Jos Boumans is <kane_at_cpan.org>. POE::Knee is his brainchild.
-
-=item Rocco Caputo
-
-Rocco Caputo is <troc+poe at netrus.net>. POE itself is his creation.
-
-=head2 COPYRIGHT
-
-Copyright (c) 2001, Jos Boumans. All Rights Reserved. This module
-is free software. It may be used, redistributed and/or modified
-under the terms of the Perl Artistic License (see
-http://www.perl.com/perl/misc/Artistic.html)
-
-Except where otherwise noted, POE is Copyright 1998-2001 Rocco Caputo.
-All rights reserved. POE is free software; you may redistribute it
-and/or modify it under the same terms as Perl itself.
+=head1 AUTHORS
+
+=over 4
+
+=item *
+
+Jos Boumans <kane at cpan.org>
+
+=item *
+
+Rocco Caputo <rcaputo at cpan.org>
=back
-=cut
+=head1 COPYRIGHT AND LICENSE
+
+This software is copyright (c) 2011 by Jos Boumans.
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as the Perl 5 programming language system itself.
+
+=cut
+
More information about the Pkg-perl-cvs-commits
mailing list