r11666 - in /branches/upstream/libclass-prototyped-perl/current: Changes META.yml Makefile.PL README lib/Class/Prototyped.pm
tincho-guest at users.alioth.debian.org
tincho-guest at users.alioth.debian.org
Wed Dec 26 00:48:16 UTC 2007
Author: tincho-guest
Date: Wed Dec 26 00:48:16 2007
New Revision: 11666
URL: http://svn.debian.org/wsvn/?sc=1&rev=11666
Log:
[svn-upgrade] Integrating new upstream version, libclass-prototyped-perl (1.11)
Modified:
branches/upstream/libclass-prototyped-perl/current/Changes
branches/upstream/libclass-prototyped-perl/current/META.yml
branches/upstream/libclass-prototyped-perl/current/Makefile.PL
branches/upstream/libclass-prototyped-perl/current/README
branches/upstream/libclass-prototyped-perl/current/lib/Class/Prototyped.pm
Modified: branches/upstream/libclass-prototyped-perl/current/Changes
URL: http://svn.debian.org/wsvn/branches/upstream/libclass-prototyped-perl/current/Changes?rev=11666&op=diff
==============================================================================
--- branches/upstream/libclass-prototyped-perl/current/Changes (original)
+++ branches/upstream/libclass-prototyped-perl/current/Changes Wed Dec 26 00:48:16 2007
@@ -1,4 +1,9 @@
Revision history for Perl extension Class::Prototyped
+
+1.11 Tue Dec 18 2007
+ - Fixed error in synopsis (C::P->new is correct, C::P::new isn't). Thanks
+ to Matthew Browning.
+ - Added @$isa=@$isa changes to workaround @ISA issues in 5.10.0.
1.10 Tue Mar 15 2005
- Merlyn strongly suggested that I unify the behavior of new() for named
Modified: branches/upstream/libclass-prototyped-perl/current/META.yml
URL: http://svn.debian.org/wsvn/branches/upstream/libclass-prototyped-perl/current/META.yml?rev=11666&op=diff
==============================================================================
--- branches/upstream/libclass-prototyped-perl/current/META.yml (original)
+++ branches/upstream/libclass-prototyped-perl/current/META.yml Wed Dec 26 00:48:16 2007
@@ -1,35 +1,31 @@
---- #YAML:1.0
+---
name: Class-Prototyped
-version: 1.10
+version: 1.11
author:
- - ! >-
- Written by Ned Konz, perl at bike-nomad.com and Toby Ovod-Everett,
- toby at ovod-everett.org. 5.005_03 porting by chromatic.
+ - 'Written by Ned Konz, perl at bike-nomad.com and Toby Ovod-Everett, toby at ovod-everett.org. 5.005_03 porting by chromatic.'
abstract: Fast prototype-based OO programming in Perl
license: perl
+resources:
+ license: http://dev.perl.org/licenses/
provides:
Class::Prototyped:
file: lib/Class/Prototyped.pm
- version: 1.10
+ version: 1.11
Class::Prototyped::Mirror:
- file: lib/Class/Prototyped.pm
- version: 1.10
+ file: lib/Class/Prototyped/Graph.pm
Class::Prototyped::Mirror::Normal:
file: lib/Class/Prototyped.pm
- version: 1.10
Class::Prototyped::Mirror::PROFILE:
file: lib/Class/Prototyped.pm
- version: 1.10
Class::Prototyped::Mirror::SUPER:
file: lib/Class/Prototyped.pm
- version: 1.10
Class::Prototyped::Tied:
file: lib/Class/Prototyped.pm
- version: 1.10
Class::Prototyped::Tied::AutoVivify:
file: lib/Class/Prototyped.pm
- version: 1.10
Class::Prototyped::Tied::Default:
file: lib/Class/Prototyped.pm
- version: 1.10
-generated_by: Module::Build version 0.24
+generated_by: Module::Build version 0.2808
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.2.html
+ version: 1.2
Modified: branches/upstream/libclass-prototyped-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/branches/upstream/libclass-prototyped-perl/current/Makefile.PL?rev=11666&op=diff
==============================================================================
--- branches/upstream/libclass-prototyped-perl/current/Makefile.PL (original)
+++ branches/upstream/libclass-prototyped-perl/current/Makefile.PL Wed Dec 26 00:48:16 2007
@@ -5,6 +5,7 @@
'PL_FILES' => {},
'INSTALLDIRS' => 'site',
'NAME' => 'Class::Prototyped',
+ 'EXE_FILES' => [],
'VERSION_FROM' => 'lib/Class/Prototyped.pm',
'PREREQ_PM' => {}
)
Modified: branches/upstream/libclass-prototyped-perl/current/README
URL: http://svn.debian.org/wsvn/branches/upstream/libclass-prototyped-perl/current/README?rev=11666&op=diff
==============================================================================
--- branches/upstream/libclass-prototyped-perl/current/README (original)
+++ branches/upstream/libclass-prototyped-perl/current/README Wed Dec 26 00:48:16 2007
@@ -18,7 +18,7 @@
$p->field1('something new');
print $p->field1;
- my $p2 = Class::Prototyped::new(
+ my $p2 = Class::Prototyped->new(
'parent*' => $p,
field2 => 234,
sub2 => sub { print "this is sub2 in p2" }
Modified: branches/upstream/libclass-prototyped-perl/current/lib/Class/Prototyped.pm
URL: http://svn.debian.org/wsvn/branches/upstream/libclass-prototyped-perl/current/lib/Class/Prototyped.pm?rev=11666&op=diff
==============================================================================
--- branches/upstream/libclass-prototyped-perl/current/lib/Class/Prototyped.pm (original)
+++ branches/upstream/libclass-prototyped-perl/current/lib/Class/Prototyped.pm Wed Dec 26 00:48:16 2007
@@ -24,7 +24,7 @@
use strict;
use Carp();
-$Class::Prototyped::VERSION = '1.10';
+$Class::Prototyped::VERSION = '1.11';
sub import {
while (my $symbol = shift) {
@@ -208,6 +208,7 @@
# this is required to re-cache @ISA
delete ${"$package\::"}{'::ISA::CACHE::'};
+ @$isa=@$isa;
my $parent_DESTROY;
my (@isa_queue) = @{"$package\::ISA"};
@@ -677,6 +678,7 @@
push (@$isa, 'Class::Prototyped');
no strict 'refs';
delete ${"$package\::"}{'::ISA::CACHE::'}; # re-cache @ISA
+ @$isa=@$isa;
}
if (@{$parentOrder}) {
@@ -1120,6 +1122,7 @@
#Defends against ISA caching problems
no strict 'refs';
delete ${"$package\::"}{'::ISA::CACHE::'};
+ @$isa = @$isa;
}
splice(@$parentOrder, $splice_point, 0, $slotName);
}
@@ -1199,10 +1202,10 @@
splice(@$parentOrder, $index, 1);
splice(@$isa, $index, 1);
{
-
#Defends against ISA caching problems
no strict 'refs';
delete ${"$package\::"}{'::ISA::CACHE::'};
+ @$isa=@$isa;
}
}
else { # not found
@@ -1459,9 +1462,9 @@
@{$parentOrder}), 'Class::Prototype');
# this is required to re-cache @ISA
-# my $package = $mirror->package;
no strict 'refs';
delete ${"$package\::"}{'::ISA::CACHE::'};
+ @$isa=@$isa;
}
sub wrap {
@@ -1618,7 +1621,7 @@
$p->field1('something new');
print $p->field1;
- my $p2 = Class::Prototyped::new(
+ my $p2 = Class::Prototyped->new(
'parent*' => $p,
field2 => 234,
sub2 => sub { print "this is sub2 in p2" }
More information about the Pkg-perl-cvs-commits
mailing list