r64106 - in /trunk/libcatalyst-view-tt-perl: ./ debian/ inc/Module/ inc/Module/Install/ lib/Catalyst/View/ t/ t/lib/TestApp/View/TT/
ansgar at users.alioth.debian.org
ansgar at users.alioth.debian.org
Thu Oct 21 10:43:29 UTC 2010
Author: ansgar
Date: Thu Oct 21 10:42:44 2010
New Revision: 64106
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=64106
Log:
* New upstream release.
* No longer run POD tests.
* Add myself to Uploaders.
Added:
trunk/libcatalyst-view-tt-perl/t/lib/TestApp/View/TT/ExposeMethodsSubclassed.pm
- copied unchanged from r64105, branches/upstream/libcatalyst-view-tt-perl/current/t/lib/TestApp/View/TT/ExposeMethodsSubclassed.pm
Modified:
trunk/libcatalyst-view-tt-perl/Changes
trunk/libcatalyst-view-tt-perl/MANIFEST
trunk/libcatalyst-view-tt-perl/META.yml
trunk/libcatalyst-view-tt-perl/debian/changelog
trunk/libcatalyst-view-tt-perl/debian/control
trunk/libcatalyst-view-tt-perl/debian/rules
trunk/libcatalyst-view-tt-perl/inc/Module/Install.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/AutoInstall.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Base.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Can.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Fetch.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Include.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Makefile.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Metadata.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/Win32.pm
trunk/libcatalyst-view-tt-perl/inc/Module/Install/WriteAll.pm
trunk/libcatalyst-view-tt-perl/lib/Catalyst/View/TT.pm
trunk/libcatalyst-view-tt-perl/t/12expose_methods.t
Modified: trunk/libcatalyst-view-tt-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/Changes?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/Changes (original)
+++ trunk/libcatalyst-view-tt-perl/Changes Thu Oct 21 10:42:44 2010
@@ -1,4 +1,7 @@
Revision history for Perl extension Catalyst::View::TT.
+
+0.36 2010-10-19 15:00:00
+ - Fixed subclassing when using expose_methods
0.35 2010-08-26 01:38:00
- Add expose_methods functionality
Modified: trunk/libcatalyst-view-tt-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/MANIFEST?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/MANIFEST (original)
+++ trunk/libcatalyst-view-tt-perl/MANIFEST Thu Oct 21 10:42:44 2010
@@ -39,6 +39,7 @@
t/lib/TestApp/View/TT/Appconfig.pm
t/lib/TestApp/View/TT/Encoding.pm
t/lib/TestApp/View/TT/ExposeMethods.pm
+t/lib/TestApp/View/TT/ExposeMethodsSubclassed.pm
t/lib/TestApp/View/TT/Includepath.pm
t/lib/TestApp/View/TT/Includepath2.pm
t/lib/TestApp/View/TT/Includepath3.pm
Modified: trunk/libcatalyst-view-tt-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/META.yml?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/META.yml (original)
+++ trunk/libcatalyst-view-tt-perl/META.yml Thu Oct 21 10:42:44 2010
@@ -8,7 +8,7 @@
configure_requires:
ExtUtils::MakeMaker: 6.42
distribution_type: module
-generated_by: 'Module::Install version 0.99'
+generated_by: 'Module::Install version 1.00'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -25,9 +25,8 @@
Path::Class: 0
Template: 0
Template::Timer: 0
- Test::More: 0
perl: 5.8.1
resources:
license: http://dev.perl.org/licenses/
repository: http://dev.catalyst.perl.org/repos/Catalyst/Catalyst-View-TT/
-version: 0.35
+version: 0.36
Modified: trunk/libcatalyst-view-tt-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/debian/changelog?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/debian/changelog (original)
+++ trunk/libcatalyst-view-tt-perl/debian/changelog Thu Oct 21 10:42:44 2010
@@ -1,3 +1,11 @@
+libcatalyst-view-tt-perl (0.36-1) unstable; urgency=low
+
+ * New upstream release.
+ * No longer run POD tests.
+ * Add myself to Uploaders.
+
+ -- Ansgar Burchardt <ansgar at debian.org> Thu, 21 Oct 2010 12:34:31 +0200
+
libcatalyst-view-tt-perl (0.35-1) unstable; urgency=low
* New upstream release.
Modified: trunk/libcatalyst-view-tt-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/debian/control?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/debian/control (original)
+++ trunk/libcatalyst-view-tt-perl/debian/control Thu Oct 21 10:42:44 2010
@@ -2,12 +2,13 @@
Section: perl
Priority: optional
Build-Depends: debhelper (>= 7.2.13)
-Build-Depends-Indep: perl, libcatalyst-perl, libtest-pod-coverage-perl,
+Build-Depends-Indep: perl, libcatalyst-perl,
libtemplate-perl, libtemplate-timer-perl, libtemplate-provider-encoding-perl,
- libmro-compat-perl, libtest-pod-perl
+ libmro-compat-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Krzysztof Krzyżaniak (eloy) <eloy at debian.org>,
- Jonathan Yu <jawnsy at cpan.org>, gregor herrmann <gregoa at debian.org>
+ Jonathan Yu <jawnsy at cpan.org>, gregor herrmann <gregoa at debian.org>,
+ Ansgar Burchardt <ansgar at debian.org>
Standards-Version: 3.9.1
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libcatalyst-view-tt-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/
Modified: trunk/libcatalyst-view-tt-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/debian/rules?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/debian/rules (original)
+++ trunk/libcatalyst-view-tt-perl/debian/rules Thu Oct 21 10:42:44 2010
@@ -2,6 +2,3 @@
%:
dh $@
-
-override_dh_auto_test:
- TEST_POD=1 dh_auto_test
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install.pm Thu Oct 21 10:42:44 2010
@@ -31,7 +31,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.99';
+ $VERSION = '1.00';
# Storage for the pseudo-singleton
$MAIN = undef;
@@ -230,8 +230,12 @@
sub new {
my ($class, %args) = @_;
- delete $INC{'FindBin.pm'};
- require FindBin;
+ delete $INC{'FindBin.pm'};
+ {
+ # to suppress the redefine warning
+ local $SIG{__WARN__} = sub {};
+ require FindBin;
+ }
# ignore the prefix on extension modules built from top level.
my $base_path = Cwd::abs_path($FindBin::Bin);
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/AutoInstall.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/AutoInstall.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/AutoInstall.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/AutoInstall.pm Thu Oct 21 10:42:44 2010
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
@@ -48,6 +48,14 @@
while (my ($mod, $ver) = splice(@requires, 0, 2)) {
$seen{$mod}{$ver}++;
}
+ my @build_requires = map @$_, map @$_, grep ref, $self->build_requires;
+ while (my ($mod, $ver) = splice(@build_requires, 0, 2)) {
+ $seen{$mod}{$ver}++;
+ }
+ my @configure_requires = map @$_, map @$_, grep ref, $self->configure_requires;
+ while (my ($mod, $ver) = splice(@configure_requires, 0, 2)) {
+ $seen{$mod}{$ver}++;
+ }
my @deduped;
while (my ($mod, $ver) = splice(@features_require, 0, 2)) {
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Base.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Base.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Base.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Base.pm Thu Oct 21 10:42:44 2010
@@ -4,7 +4,7 @@
use strict 'vars';
use vars qw{$VERSION};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
}
# Suspend handler for "redefined" warnings
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Can.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Can.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Can.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Can.pm Thu Oct 21 10:42:44 2010
@@ -9,7 +9,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Fetch.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Fetch.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Fetch.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Fetch.pm Thu Oct 21 10:42:44 2010
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Include.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Include.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Include.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Include.pm Thu Oct 21 10:42:44 2010
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Makefile.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Makefile.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Makefile.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Makefile.pm Thu Oct 21 10:42:44 2010
@@ -8,7 +8,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Metadata.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Metadata.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Metadata.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Metadata.pm Thu Oct 21 10:42:44 2010
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/Win32.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/Win32.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/Win32.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/Win32.pm Thu Oct 21 10:42:44 2010
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/inc/Module/Install/WriteAll.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/inc/Module/Install/WriteAll.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/inc/Module/Install/WriteAll.pm (original)
+++ trunk/libcatalyst-view-tt-perl/inc/Module/Install/WriteAll.pm Thu Oct 21 10:42:44 2010
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '0.99';
+ $VERSION = '1.00';
@ISA = qw{Module::Install::Base};
$ISCORE = 1;
}
Modified: trunk/libcatalyst-view-tt-perl/lib/Catalyst/View/TT.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/lib/Catalyst/View/TT.pm?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/lib/Catalyst/View/TT.pm (original)
+++ trunk/libcatalyst-view-tt-perl/lib/Catalyst/View/TT.pm Thu Oct 21 10:42:44 2010
@@ -10,7 +10,8 @@
use MRO::Compat;
use Scalar::Util qw/blessed weaken/;
-our $VERSION = '0.35';
+our $VERSION = '0.36';
+$VERSION = eval $VERSION;
__PACKAGE__->mk_accessors('template');
__PACKAGE__->mk_accessors('expose_methods');
@@ -278,7 +279,7 @@
if ($self->expose_methods) {
my $meta = $self->meta;
foreach my $method_name (@{$self->expose_methods}) {
- my $method = $meta->get_method( $method_name );
+ my $method = $meta->find_method_by_name( $method_name );
unless ($method) {
Catalyst::Exception->throw( "$method_name not found in TT view" );
}
Modified: trunk/libcatalyst-view-tt-perl/t/12expose_methods.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcatalyst-view-tt-perl/t/12expose_methods.t?rev=64106&op=diff
==============================================================================
--- trunk/libcatalyst-view-tt-perl/t/12expose_methods.t (original)
+++ trunk/libcatalyst-view-tt-perl/t/12expose_methods.t Thu Oct 21 10:42:44 2010
@@ -1,6 +1,6 @@
use strict;
use warnings;
-use Test::More tests => 3;
+use Test::More;
use FindBin;
use lib "$FindBin::Bin/lib";
@@ -10,3 +10,7 @@
my $response;
ok(($response = request("/test?view=ExposeMethods&template=expose_methods.tt"))->is_success, 'request ok');
is($response->content, "magic added param", 'message ok');
+ok(($response = request("/test?view=ExposeMethodsSubclassed&template=expose_methods.tt"))->is_success, 'request ok');
+is($response->content, "magic added param", 'message ok');
+
+done_testing;
More information about the Pkg-perl-cvs-commits
mailing list