r40441 - in /trunk/libaspect-perl: ./ debian/ inc/Module/ inc/Module/Install/ lib/ lib/Aspect/ lib/Aspect/Hook/ lib/Aspect/Library/ lib/Aspect/Pointcut/ t/lib/Test/ t/lib/Test/Builder/ t/lib/Test/Class/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Wed Jul 22 03:00:10 UTC 2009
Author: jawnsy-guest
Date: Wed Jul 22 02:59:57 2009
New Revision: 40441
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=40441
Log:
* Updated copyright information
+ Added M::I copyright
+ Updated copyright (2009, Adam Kennedy, main dist)
+ Fixed copyright for Algorithm::Diff based on version 1.1902
* Added myself to Uploaders
Modified:
trunk/libaspect-perl/Changes
trunk/libaspect-perl/META.yml
trunk/libaspect-perl/Makefile.PL
trunk/libaspect-perl/debian/changelog
trunk/libaspect-perl/debian/copyright
trunk/libaspect-perl/inc/Module/Install.pm
trunk/libaspect-perl/inc/Module/Install/Base.pm
trunk/libaspect-perl/inc/Module/Install/Can.pm
trunk/libaspect-perl/inc/Module/Install/DSL.pm
trunk/libaspect-perl/inc/Module/Install/Fetch.pm
trunk/libaspect-perl/inc/Module/Install/Makefile.pm
trunk/libaspect-perl/inc/Module/Install/Metadata.pm
trunk/libaspect-perl/inc/Module/Install/Win32.pm
trunk/libaspect-perl/inc/Module/Install/WriteAll.pm
trunk/libaspect-perl/lib/Aspect.pm
trunk/libaspect-perl/lib/Aspect/Advice.pm
trunk/libaspect-perl/lib/Aspect/AdviceContext.pm
trunk/libaspect-perl/lib/Aspect/Hook/LexWrap.pm
trunk/libaspect-perl/lib/Aspect/Library/Listenable.pm
trunk/libaspect-perl/lib/Aspect/Library/Memoize.pm
trunk/libaspect-perl/lib/Aspect/Library/Singleton.pm
trunk/libaspect-perl/lib/Aspect/Library/TestClass.pm
trunk/libaspect-perl/lib/Aspect/Library/Wormhole.pm
trunk/libaspect-perl/lib/Aspect/Modular.pm
trunk/libaspect-perl/lib/Aspect/Pointcut.pm
trunk/libaspect-perl/lib/Aspect/Pointcut/AndOp.pm
trunk/libaspect-perl/lib/Aspect/Pointcut/BinOp.pm
trunk/libaspect-perl/lib/Aspect/Pointcut/Call.pm
trunk/libaspect-perl/lib/Aspect/Pointcut/Cflow.pm
trunk/libaspect-perl/lib/Aspect/Pointcut/NotOp.pm
trunk/libaspect-perl/lib/Aspect/Pointcut/OrOp.pm
trunk/libaspect-perl/lib/Aspect/Weaver.pm
trunk/libaspect-perl/t/lib/Test/Builder/Tester.pm
trunk/libaspect-perl/t/lib/Test/Class.pm
trunk/libaspect-perl/t/lib/Test/Class/MethodInfo.pm
trunk/libaspect-perl/t/lib/Test/Exception.pm
Modified: trunk/libaspect-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/Changes?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/Changes (original)
+++ trunk/libaspect-perl/Changes Wed Jul 22 02:59:57 2009
@@ -1,4 +1,7 @@
Revision history for Perl extension Aspect
+
+0.21 Tue 21 Jul 2009
+ - Bumped the version to 0.21 so the Hook::LexWrap module indexes
0.16 Tue 19 May 2009
- Moved out Aspect::Library::Profiler into a standalone distribution
Modified: trunk/libaspect-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/META.yml?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/META.yml (original)
+++ trunk/libaspect-perl/META.yml Wed Jul 22 02:59:57 2009
@@ -9,7 +9,7 @@
configure_requires:
ExtUtils::MakeMaker: 6.42
distribution_type: module
-generated_by: 'Module::Install version 0.88'
+generated_by: 'Module::Install version 0.91'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -29,4 +29,4 @@
ChangeLog: http://fisheye2.atlassian.com/changelog/cpan/trunk/Aspect
license: http://dev.perl.org/licenses/
repository: http://svn.ali.as/cpan/trunk/Aspect
-version: 0.16
+version: 0.21
Modified: trunk/libaspect-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/Makefile.PL?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/Makefile.PL (original)
+++ trunk/libaspect-perl/Makefile.PL Wed Jul 22 02:59:57 2009
@@ -1,4 +1,4 @@
-use inc::Module::Install::DSL 0.88;
+use inc::Module::Install::DSL 0.91;
all_from lib/Aspect.pm
requires Devel::Symdump 2.04
Modified: trunk/libaspect-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/debian/changelog?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/debian/changelog (original)
+++ trunk/libaspect-perl/debian/changelog Wed Jul 22 02:59:57 2009
@@ -1,10 +1,17 @@
-libaspect-perl (0.16-1) UNRELEASED; urgency=low
+libaspect-perl (0.21-1) UNRELEASED; urgency=low
+ * Updated copyright information
+ + Added M::I copyright
+ + Updated copyright (2009, Adam Kennedy, main dist)
+ + Fixed copyright for Algorithm::Diff based on version 1.1902
+ * Added myself to Uploaders
+
+ [ Ryan Niebur ]
* New upstream release
* Add myself to Uploaders
* TODO is gone, don't install it anymore
- -- Ryan Niebur <ryanryan52 at gmail.com> Mon, 20 Jul 2009 13:09:51 -0700
+ -- Jonathan Yu <frequency at cpan.org> Tue, 21 Jul 2009 18:48:33 -0400
libaspect-perl (0.14-2) unstable; urgency=low
Modified: trunk/libaspect-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/debian/copyright?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/debian/copyright (original)
+++ trunk/libaspect-perl/debian/copyright Wed Jul 22 02:59:57 2009
@@ -1,6 +1,6 @@
Format-Specification:
http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
-Upstream-Maintainer: Marcel Grünauer <marcel at cpan.org>
+Upstream-Maintainer: Adam Kennedy <adamk at cpan.org>
Upstream-Source: http://search.cpan.org/dist/Aspect/
Upstream-Name: Aspect
Comment:
@@ -8,28 +8,14 @@
on behalf of Allianz24.
Files: *
-Copyright: 2001-2002, Marcel Grünauer <marcel at cpan.org>
+Copyright: 2009, Adam Kennedy <adamk at cpan.org>
+ 2001-2002, Marcel Grünauer <marcel at cpan.org>
License-Alias: Perl
License: Artistic | GPL-1+
Files: t/lib/Algorithm/Diff.pm
-Copyright:
- Versions through 0.59 (and much of this documentation) were written by:
- Mark-Jason Dominus, mjd-perl-diff at plover.com
- .
- This version borrows some documentation and routine names from
- Mark-Jason's, but Diff.pm's code was completely replaced.
- .
- This code was adapted from the Smalltalk code of Mario Wolczko
- <mario at wolczko.com>, which is available at
- ftp://st.cs.uiuc.edu/pub/Smalltalk/MANCHESTER/manchester/4.0/diff.st
- .
- sdiff and traverse_balanced were written by Mike Schilli
- <m at perlmeister.com>.
- .
- Much work was done by Ned Konz (perl at bike-nomad.com).
- .
- The OO interface and some other changes are by Tye McQueen.
+Copyright: 2000-2004, Ned Konz <perl at bike-nomad.com>
+ 2000-2009, Tye McQueen <tyemq at cpan.org>
Files: t/lib/Text/Diff/Table.pm t/lib/Test/Differences.pm
Copyright: Copyright 2001 Barrie Slaymaker, All Rights Reserved.
@@ -54,7 +40,15 @@
License: Artistic | GPL-1+
Files: debian/*
-Copyright: 2009, Christoph Berg <myon at debian.org>
+Copyright: 2009, Jonathan Yu <frequency at cpan.org>
+ 2009, Christoph Berg <myon at debian.org>
+License: Artistic | GPL-1+
+
+Files: inc/Module/*
+Copyright: 2002-2009, Adam Kennedy <adamk at cpan.org>
+ 2002-2009, Audrey Tang <autrijus at autrijus.org>
+ 2002-2009, Brian Ingerson <ingy at cpan.org>
+License-Alias: Perl
License: Artistic | GPL-1+
License: Artistic
Modified: trunk/libaspect-perl/inc/Module/Install.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install.pm Wed Jul 22 02:59:57 2009
@@ -28,7 +28,7 @@
# 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
# Module::Install extensions.
- $VERSION = '0.88';
+ $VERSION = '0.91';
# Storage for the pseudo-singleton
$MAIN = undef;
Modified: trunk/libaspect-perl/inc/Module/Install/Base.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/Base.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/Base.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/Base.pm Wed Jul 22 02:59:57 2009
@@ -4,7 +4,7 @@
use strict 'vars';
use vars qw{$VERSION};
BEGIN {
- $VERSION = '0.88';
+ $VERSION = '0.91';
}
# Suspend handler for "redefined" warnings
@@ -13,42 +13,34 @@
$SIG{__WARN__} = sub { $w };
}
-### This is the ONLY module that shouldn't have strict on
-# use strict;
-
-#line 45
+#line 42
sub new {
- my ($class, %args) = @_;
-
- foreach my $method ( qw(call load) ) {
- next if defined &{"$class\::$method"};
- *{"$class\::$method"} = sub {
- shift()->_top->$method(@_);
- };
+ my $class = shift;
+ unless ( defined &{"${class}::call"} ) {
+ *{"${class}::call"} = sub { shift->_top->call(@_) };
}
-
- bless( \%args, $class );
+ unless ( defined &{"${class}::load"} ) {
+ *{"${class}::load"} = sub { shift->_top->load(@_) };
+ }
+ bless { @_ }, $class;
}
-#line 66
+#line 61
sub AUTOLOAD {
- my $self = shift;
local $@;
- my $autoload = eval {
- $self->_top->autoload
- } or return;
- goto &$autoload;
+ my $func = eval { shift->_top->autoload } or return;
+ goto &$func;
}
-#line 83
+#line 75
sub _top {
$_[0]->{_top};
}
-#line 98
+#line 90
sub admin {
$_[0]->_top->{admin}
@@ -56,7 +48,7 @@
Module::Install::Base::FakeAdmin->new;
}
-#line 114
+#line 106
sub is_admin {
$_[0]->admin->VERSION;
@@ -83,4 +75,4 @@
1;
-#line 162
+#line 154
Modified: trunk/libaspect-perl/inc/Module/Install/Can.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/Can.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/Can.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/Can.pm Wed Jul 22 02:59:57 2009
@@ -2,16 +2,16 @@
package Module::Install::Can;
use strict;
-use Module::Install::Base;
-use Config ();
-use File::Spec ();
-use ExtUtils::MakeMaker ();
+use Config ();
+use File::Spec ();
+use ExtUtils::MakeMaker ();
+use Module::Install::Base ();
-use vars qw{$VERSION $ISCORE @ISA};
+use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.88';
+ $VERSION = '0.91';
+ @ISA = 'Module::Install::Base';
$ISCORE = 1;
- @ISA = qw{Module::Install::Base};
}
# check if we can load some module
Modified: trunk/libaspect-perl/inc/Module/Install/DSL.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/DSL.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/DSL.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/DSL.pm Wed Jul 22 02:59:57 2009
@@ -4,14 +4,11 @@
use strict;
use vars qw{$VERSION $ISCORE};
BEGIN {
- $VERSION = '0.88';
+ $VERSION = '0.91';
$ISCORE = 1;
*inc::Module::Install::DSL::VERSION = *VERSION;
@inc::Module::Install::DSL::ISA = __PACKAGE__;
}
-
-# Load the main Module::Install as usual.
-# require Module::Install;
sub import {
# Read in the rest of the Makefile.PL
Modified: trunk/libaspect-perl/inc/Module/Install/Fetch.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/Fetch.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/Fetch.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/Fetch.pm Wed Jul 22 02:59:57 2009
@@ -2,13 +2,13 @@
package Module::Install::Fetch;
use strict;
-use Module::Install::Base;
+use Module::Install::Base ();
-use vars qw{$VERSION $ISCORE @ISA};
+use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.88';
+ $VERSION = '0.91';
+ @ISA = 'Module::Install::Base';
$ISCORE = 1;
- @ISA = qw{Module::Install::Base};
}
sub get_file {
Modified: trunk/libaspect-perl/inc/Module/Install/Makefile.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/Makefile.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/Makefile.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/Makefile.pm Wed Jul 22 02:59:57 2009
@@ -2,14 +2,14 @@
package Module::Install::Makefile;
use strict 'vars';
-use Module::Install::Base;
-use ExtUtils::MakeMaker ();
-
-use vars qw{$VERSION $ISCORE @ISA};
+use ExtUtils::MakeMaker ();
+use Module::Install::Base ();
+
+use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.88';
+ $VERSION = '0.91';
+ @ISA = 'Module::Install::Base';
$ISCORE = 1;
- @ISA = qw{Module::Install::Base};
}
sub Makefile { $_[0] }
Modified: trunk/libaspect-perl/inc/Module/Install/Metadata.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/Metadata.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/Metadata.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/Metadata.pm Wed Jul 22 02:59:57 2009
@@ -2,18 +2,17 @@
package Module::Install::Metadata;
use strict 'vars';
-use Module::Install::Base;
+use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.88';
- @ISA = qw{Module::Install::Base};
+ $VERSION = '0.91';
+ @ISA = 'Module::Install::Base';
$ISCORE = 1;
}
my @boolean_keys = qw{
sign
- mymeta
};
my @scalar_keys = qw{
@@ -440,21 +439,21 @@
/ixms ) {
my $license_text = $1;
my @phrases = (
- 'under the same (?:terms|license) as perl itself' => 'perl', 1,
- 'GNU general public license' => 'gpl', 1,
- 'GNU public license' => 'gpl', 1,
- 'GNU lesser general public license' => 'lgpl', 1,
- 'GNU lesser public license' => 'lgpl', 1,
- 'GNU library general public license' => 'lgpl', 1,
- 'GNU library public license' => 'lgpl', 1,
- 'BSD license' => 'bsd', 1,
- 'Artistic license' => 'artistic', 1,
- 'GPL' => 'gpl', 1,
- 'LGPL' => 'lgpl', 1,
- 'BSD' => 'bsd', 1,
- 'Artistic' => 'artistic', 1,
- 'MIT' => 'mit', 1,
- 'proprietary' => 'proprietary', 0,
+ 'under the same (?:terms|license) as (?:perl|the perl programming language) itself' => 'perl', 1,
+ 'GNU general public license' => 'gpl', 1,
+ 'GNU public license' => 'gpl', 1,
+ 'GNU lesser general public license' => 'lgpl', 1,
+ 'GNU lesser public license' => 'lgpl', 1,
+ 'GNU library general public license' => 'lgpl', 1,
+ 'GNU library public license' => 'lgpl', 1,
+ 'BSD license' => 'bsd', 1,
+ 'Artistic license' => 'artistic', 1,
+ 'GPL' => 'gpl', 1,
+ 'LGPL' => 'lgpl', 1,
+ 'BSD' => 'bsd', 1,
+ 'Artistic' => 'artistic', 1,
+ 'MIT' => 'mit', 1,
+ 'proprietary' => 'proprietary', 0,
);
while ( my ($pattern, $license, $osi) = splice(@phrases, 0, 3) ) {
$pattern =~ s{\s+}{\\s+}g;
@@ -503,6 +502,17 @@
my $module = shift @requires;
my $version = shift @requires;
$self->requires( $module => $version );
+ }
+}
+
+sub test_requires_from {
+ my $self = shift;
+ my $content = Module::Install::_readperl($_[0]);
+ my @requires = $content =~ m/^use\s+([^\W\d]\w*(?:::\w+)*)\s+([\d\.]+)/mg;
+ while ( @requires ) {
+ my $module = shift @requires;
+ my $version = shift @requires;
+ $self->test_requires( $module => $version );
}
}
@@ -516,7 +526,8 @@
$v =~ s/(\.\d\d\d)000$/$1/;
$v =~ s/_.+$//;
if ( ref($v) ) {
- $v = $v + 0; # Numify
+ # Numify
+ $v = $v + 0;
}
return $v;
}
@@ -526,21 +537,56 @@
######################################################################
-# MYMETA.yml Support
+# MYMETA Support
sub WriteMyMeta {
die "WriteMyMeta has been deprecated";
}
-sub write_mymeta {
- my $self = shift;
-
- # If there's no existing META.yml there is nothing we can do
- return unless -f 'META.yml';
+sub write_mymeta_yaml {
+ my $self = shift;
# We need YAML::Tiny to write the MYMETA.yml file
unless ( eval { require YAML::Tiny; 1; } ) {
return 1;
+ }
+
+ # Generate the data
+ my $meta = $self->_write_mymeta_data or return 1;
+
+ # Save as the MYMETA.yml file
+ print "Writing MYMETA.yml\n";
+ YAML::Tiny::DumpFile('MYMETA.yml', $meta);
+}
+
+sub write_mymeta_json {
+ my $self = shift;
+
+ # We need JSON to write the MYMETA.json file
+ unless ( eval { require JSON; 1; } ) {
+ return 1;
+ }
+
+ # Generate the data
+ my $meta = $self->_write_mymeta_data or return 1;
+
+ # Save as the MYMETA.yml file
+ print "Writing MYMETA.json\n";
+ Module::Install::_write(
+ 'MYMETA.json',
+ JSON->new->pretty(1)->canonical->encode($meta),
+ );
+}
+
+sub _write_mymeta_data {
+ my $self = shift;
+
+ # If there's no existing META.yml there is nothing we can do
+ return undef unless -f 'META.yml';
+
+ # We need Parse::CPAN::Meta to load the file
+ unless ( eval { require Parse::CPAN::Meta; 1; } ) {
+ return undef;
}
# Merge the perl version into the dependencies
@@ -558,7 +604,7 @@
}
# Load the advisory META.yml file
- my @yaml = YAML::Tiny::LoadFile('META.yml');
+ my @yaml = Parse::CPAN::Meta::LoadFile('META.yml');
my $meta = $yaml[0];
# Overwrite the non-configure dependency hashs
@@ -572,9 +618,7 @@
$meta->{build_requires} = { map { @$_ } @{ $val->{build_requires} } };
}
- # Save as the MYMETA.yml file
- print "Writing MYMETA.yml\n";
- YAML::Tiny::DumpFile('MYMETA.yml', $meta);
+ return $meta;
}
1;
Modified: trunk/libaspect-perl/inc/Module/Install/Win32.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/Win32.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/Win32.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/Win32.pm Wed Jul 22 02:59:57 2009
@@ -2,12 +2,12 @@
package Module::Install::Win32;
use strict;
-use Module::Install::Base;
+use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.88';
- @ISA = qw{Module::Install::Base};
+ $VERSION = '0.91';
+ @ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libaspect-perl/inc/Module/Install/WriteAll.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/inc/Module/Install/WriteAll.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/inc/Module/Install/WriteAll.pm (original)
+++ trunk/libaspect-perl/inc/Module/Install/WriteAll.pm Wed Jul 22 02:59:57 2009
@@ -2,11 +2,11 @@
package Module::Install::WriteAll;
use strict;
-use Module::Install::Base;
+use Module::Install::Base ();
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.88';
+ $VERSION = '0.91';;
@ISA = qw{Module::Install::Base};
$ISCORE = 1;
}
@@ -41,8 +41,18 @@
# The Makefile write process adds a couple of dependencies,
# so write the META.yml files after the Makefile.
- $self->Meta->write if $args{meta};
- $self->Meta->write_mymeta if $self->mymeta;
+ if ( $args{meta} ) {
+ $self->Meta->write;
+ }
+
+ # Experimental support for MYMETA
+ if ( $ENV{X_MYMETA} ) {
+ if ( $ENV{X_MYMETA} eq 'JSON' ) {
+ $self->Meta->write_mymeta_json;
+ } else {
+ $self->Meta->write_mymeta_yaml;
+ }
+ }
return 1;
}
Modified: trunk/libaspect-perl/lib/Aspect.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect.pm (original)
+++ trunk/libaspect-perl/lib/Aspect.pm Wed Jul 22 02:59:57 2009
@@ -9,7 +9,7 @@
use Aspect::Pointcut::Call ();
use Aspect::Pointcut::Cflow ();
-our $VERSION = '0.16';
+our $VERSION = '0.21';
our @ISA = 'Exporter';
our @EXPORT = qw(aspect before after call cflow);
Modified: trunk/libaspect-perl/lib/Aspect/Advice.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Advice.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Advice.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Advice.pm Wed Jul 22 02:59:57 2009
@@ -6,7 +6,7 @@
use Aspect::AdviceContext;
use Aspect::Weaver;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
sub new {
my ($class, $type, $code, $pointcut) = @_;
Modified: trunk/libaspect-perl/lib/Aspect/AdviceContext.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/AdviceContext.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/AdviceContext.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/AdviceContext.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
sub new {
Modified: trunk/libaspect-perl/lib/Aspect/Hook/LexWrap.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Hook/LexWrap.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Hook/LexWrap.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Hook/LexWrap.pm Wed Jul 22 02:59:57 2009
@@ -7,7 +7,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
*CORE::GLOBAL::caller = sub {
Modified: trunk/libaspect-perl/lib/Aspect/Library/Listenable.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Library/Listenable.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Library/Listenable.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Library/Listenable.pm Wed Jul 22 02:59:57 2009
@@ -10,7 +10,7 @@
use Aspect;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base qw(Aspect::Modular Exporter);
Modified: trunk/libaspect-perl/lib/Aspect/Library/Memoize.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Library/Memoize.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Library/Memoize.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Library/Memoize.pm Wed Jul 22 02:59:57 2009
@@ -7,7 +7,7 @@
use Aspect;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Modular';
Modified: trunk/libaspect-perl/lib/Aspect/Library/Singleton.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Library/Singleton.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Library/Singleton.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Library/Singleton.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
use Aspect;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Modular';
Modified: trunk/libaspect-perl/lib/Aspect/Library/TestClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Library/TestClass.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Library/TestClass.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Library/TestClass.pm Wed Jul 22 02:59:57 2009
@@ -6,7 +6,7 @@
use Test::Class;
use Aspect;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Modular';
Modified: trunk/libaspect-perl/lib/Aspect/Library/Wormhole.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Library/Wormhole.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Library/Wormhole.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Library/Wormhole.pm Wed Jul 22 02:59:57 2009
@@ -6,7 +6,7 @@
use Aspect;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Modular';
Modified: trunk/libaspect-perl/lib/Aspect/Modular.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Modular.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Modular.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Modular.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
# creating --------------------------------------------------------------------
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut.pm Wed Jul 22 02:59:57 2009
@@ -9,7 +9,7 @@
use Data::Dumper;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use overload
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut/AndOp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut/AndOp.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut/AndOp.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut/AndOp.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Pointcut::BinOp';
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut/BinOp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut/BinOp.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut/BinOp.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut/BinOp.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Pointcut';
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut/Call.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut/Call.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut/Call.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut/Call.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Pointcut';
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut/Cflow.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut/Cflow.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut/Cflow.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut/Cflow.pm Wed Jul 22 02:59:57 2009
@@ -6,7 +6,7 @@
use Aspect::AdviceContext;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Pointcut';
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut/NotOp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut/NotOp.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut/NotOp.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut/NotOp.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Pointcut';
Modified: trunk/libaspect-perl/lib/Aspect/Pointcut/OrOp.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Pointcut/OrOp.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Pointcut/OrOp.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Pointcut/OrOp.pm Wed Jul 22 02:59:57 2009
@@ -5,7 +5,7 @@
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use base 'Aspect::Pointcut::BinOp';
Modified: trunk/libaspect-perl/lib/Aspect/Weaver.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/lib/Aspect/Weaver.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/lib/Aspect/Weaver.pm (original)
+++ trunk/libaspect-perl/lib/Aspect/Weaver.pm Wed Jul 22 02:59:57 2009
@@ -7,7 +7,7 @@
use Devel::Symdump;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
my %UNTOUCHABLES = map { $_ => 1 } qw(
Modified: trunk/libaspect-perl/t/lib/Test/Builder/Tester.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/t/lib/Test/Builder/Tester.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/t/lib/Test/Builder/Tester.pm (original)
+++ trunk/libaspect-perl/t/lib/Test/Builder/Tester.pm Wed Jul 22 02:59:57 2009
@@ -2,7 +2,7 @@
use strict;
use vars qw(@EXPORT $VERSION @ISA);
-$VERSION = "0.16";
+$VERSION = "0.21";
use Test::Builder;
use Symbol;
Modified: trunk/libaspect-perl/t/lib/Test/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/t/lib/Test/Class.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/t/lib/Test/Class.pm (original)
+++ trunk/libaspect-perl/t/lib/Test/Class.pm Wed Jul 22 02:59:57 2009
@@ -14,7 +14,7 @@
use Test::Class::MethodInfo;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
use constant NO_PLAN => "no_plan";
Modified: trunk/libaspect-perl/t/lib/Test/Class/MethodInfo.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/t/lib/Test/Class/MethodInfo.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/t/lib/Test/Class/MethodInfo.pm (original)
+++ trunk/libaspect-perl/t/lib/Test/Class/MethodInfo.pm Wed Jul 22 02:59:57 2009
@@ -6,7 +6,7 @@
use warnings;
use Carp;
-our $VERSION = '0.16';
+our $VERSION = '0.21';
sub is_method_type {
my ($self, $type) = @_;
Modified: trunk/libaspect-perl/t/lib/Test/Exception.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libaspect-perl/t/lib/Test/Exception.pm?rev=40441&op=diff
==============================================================================
--- trunk/libaspect-perl/t/lib/Test/Exception.pm (original)
+++ trunk/libaspect-perl/t/lib/Test/Exception.pm Wed Jul 22 02:59:57 2009
@@ -9,7 +9,7 @@
use vars qw($VERSION @EXPORT @EXPORT_OK);
-$VERSION = '0.16';
+$VERSION = '0.21';
@EXPORT = qw(dies_ok lives_ok throws_ok lives_and);
my $Tester = Test::Builder->new;
More information about the Pkg-perl-cvs-commits
mailing list