r57656 - in /branches/upstream/libobject-insideout-perl/current: ./ examples/ lib/Bundle/Object/ lib/Object/ lib/Object/InsideOut/ t/
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Sat May 8 11:32:19 UTC 2010
Author: ansgar-guest
Date: Sat May 8 11:31:58 2010
New Revision: 57656
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=57656
Log:
[svn-upgrade] Integrating new upstream version, libobject-insideout-perl (3.65)
Modified:
branches/upstream/libobject-insideout-perl/current/Changes
branches/upstream/libobject-insideout-perl/current/META.yml
branches/upstream/libobject-insideout-perl/current/README
branches/upstream/libobject-insideout-perl/current/examples/YAPI.pm
branches/upstream/libobject-insideout-perl/current/lib/Bundle/Object/InsideOut.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pod
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Autoload.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Chained.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Cumulative.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dump.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dynamic.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Exception.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Foreign.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Metadata.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Overload.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Secure.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Universal.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Util.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/attributes.pm
branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/lvalue.pm
branches/upstream/libobject-insideout-perl/current/t/27-exception.t
Modified: branches/upstream/libobject-insideout-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/Changes?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/Changes (original)
+++ branches/upstream/libobject-insideout-perl/current/Changes Sat May 8 11:31:58 2010
@@ -1,4 +1,7 @@
Revision history for Perl extension Object::InsideOut.
+
+3.65 Fri May 7 19:05:34 2010
+ - Fix tests for $@ changes that will be coming with Perl 5.14
3.64 Mon Mar 8 17:59:51 2010
- Added tests related to shared object destruction
Modified: branches/upstream/libobject-insideout-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/META.yml?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/META.yml (original)
+++ branches/upstream/libobject-insideout-perl/current/META.yml Sat May 8 11:31:58 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Object-InsideOut
-version: 3.64
+version: 3.65
abstract: Comprehensive inside-out object support module
author:
- Jerry D. Hedden <jdhedden AT cpan DOT org>
@@ -17,7 +17,7 @@
Data::Dumper: 0
Exception::Class: 1.29
overload: 0
- Scalar::Util: 1.22
+ Scalar::Util: 1.23
strict: 0
Test::More: 0.5
warnings: 0
@@ -25,7 +25,7 @@
directory:
- t
- inc
-generated_by: ExtUtils::MakeMaker version 6.56
+generated_by: ExtUtils::MakeMaker version 6.5601
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: 1.4
Modified: branches/upstream/libobject-insideout-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/README?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/README (original)
+++ branches/upstream/libobject-insideout-perl/current/README Sat May 8 11:31:58 2010
@@ -1,4 +1,4 @@
-Object-InsideOut version 3.64
+Object-InsideOut version 3.65
=============================
This module provides comprehensive support for implementing classes using the
Modified: branches/upstream/libobject-insideout-perl/current/examples/YAPI.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/examples/YAPI.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/examples/YAPI.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/examples/YAPI.pm Sat May 8 11:31:58 2010
@@ -2,7 +2,7 @@
use strict;
use warnings;
- our $VERSION = '3.64';
+ our $VERSION = '3.65';
#####
#
@@ -22,7 +22,7 @@
$threaded_okay = !$@;
}
- use Object::InsideOut 3.64;
+ use Object::InsideOut 3.65;
# Default progress indicator is a twirling bar
my @yapi :Field
@@ -550,7 +550,7 @@
=head1 SEE ALSO
Annotated POD for Term::YAPI:
-L<http://annocpan.org/~JDHEDDEN/Object-InsideOut-3.64/examples/YAPI.pm>
+L<http://annocpan.org/~JDHEDDEN/Object-InsideOut-3.65/examples/YAPI.pm>
L<Object::InsideOut>, L<threads>, L<Thread::Queue>
Modified: branches/upstream/libobject-insideout-perl/current/lib/Bundle/Object/InsideOut.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Bundle/Object/InsideOut.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Bundle/Object/InsideOut.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Bundle/Object/InsideOut.pm Sat May 8 11:31:58 2010
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '3.64';
+our $VERSION = '3.65';
$VERSION = eval $VERSION;
1;
@@ -24,13 +24,13 @@
Test::Simple 0.94 - Used for module testing
-Scalar::Util 1.22 - Used by Object::InsideOut
+Scalar::Util 1.23 - Used by Object::InsideOut
Pod::Escapes 1.04 - Used by Pod::Simple
-Pod::Simple 3.13 - Used by Test::Pod
+Pod::Simple 3.14 - Used by Test::Pod
-Test::Pod 1.41 - Checks POD syntax
+Test::Pod 1.44 - Checks POD syntax
Devel::Symdump 2.08 - Used by Pod::Coverage
@@ -42,29 +42,29 @@
Test::Pod::Coverage 1.08 - Tests POD coverage
-threads 1.76 - Support for threads
+threads 1.77 - Support for threads
threads::shared 1.33 - Support for sharing objects between threads
Want 0.18 - :lvalue accessor support
-Data::Dumper 2.125 - Object serialization support
+Data::Dumper 2.126 - Object serialization support
-Storable 2.21 - Object serialization support
+Storable 2.22 - Object serialization support
Devel::StackTrace 1.22 - Used by Exception::Class
Class::Data::Inheritable 0.08 - Used by Exception::Class
-Exception::Class 1.29 - Error handling
+Exception::Class 1.30 - Error handling
-Object::InsideOut 3.64 - Inside-out object support
+Object::InsideOut 3.65 - Inside-out object support
-URI 1.52 - Used by LWP::UserAgent
+URI 1.54 - Used by LWP::UserAgent
HTML::Tagset 3.20 - Used by LWP::UserAgent
-HTML::Parser 3.64 - Used by LWP::UserAgent
+HTML::Parser 3.65 - Used by LWP::UserAgent
LWP::UserAgent 5.834 - Used by Math::Random::MT::Auto
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pm Sat May 8 11:31:58 2010
@@ -5,12 +5,12 @@
use strict;
use warnings;
-our $VERSION = '3.64';
+our $VERSION = '3.65';
$VERSION = eval $VERSION;
-use Object::InsideOut::Exception 3.64;
-use Object::InsideOut::Util 3.64 qw(create_object hash_re is_it make_shared);
-use Object::InsideOut::Metadata 3.64;
+use Object::InsideOut::Exception 3.65;
+use Object::InsideOut::Util 3.65 qw(create_object hash_re is_it make_shared);
+use Object::InsideOut::Metadata 3.65;
require B;
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pod?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pod (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut.pod Sat May 8 11:31:58 2010
@@ -4,7 +4,7 @@
=head1 VERSION
-This document describes Object::InsideOut version 3.64
+This document describes Object::InsideOut version 3.65
=head1 SYNOPSIS
@@ -3227,7 +3227,7 @@
L<http://www.cpanforum.com/dist/Object-InsideOut>
Annotated POD for Object::InsideOut:
-L<http://annocpan.org/~JDHEDDEN/Object-InsideOut-3.64/lib/Object/InsideOut.pm>
+L<http://annocpan.org/~JDHEDDEN/Object-InsideOut-3.65/lib/Object/InsideOut.pm>
Source repository:
L<http://code.google.com/p/object-insideout/>
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Autoload.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Autoload.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Autoload.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Autoload.pm Sat May 8 11:31:58 2010
@@ -172,7 +172,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Chained.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Chained.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Chained.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Chained.pm Sat May 8 11:31:58 2010
@@ -181,7 +181,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Cumulative.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Cumulative.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Cumulative.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Cumulative.pm Sat May 8 11:31:58 2010
@@ -206,11 +206,11 @@
use strict;
use warnings;
-our $VERSION = '3.64';
+our $VERSION = '3.65';
$VERSION = eval $VERSION;
-use Object::InsideOut 3.64;
-use Object::InsideOut::Metadata 3.64;
+use Object::InsideOut 3.65;
+use Object::InsideOut::Metadata 3.65;
my @VALUES :Field :Arg(VALUES);
my @CLASSES :Field :Arg(CLASSES);
@@ -260,7 +260,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dump.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dump.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dump.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dump.pm Sat May 8 11:31:58 2010
@@ -205,7 +205,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dynamic.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dynamic.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dynamic.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Dynamic.pm Sat May 8 11:31:58 2010
@@ -178,7 +178,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Exception.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Exception.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Exception.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Exception.pm Sat May 8 11:31:58 2010
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '3.64';
+our $VERSION = '3.65';
$VERSION = eval $VERSION;
# Exceptions generated by this module
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Foreign.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Foreign.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Foreign.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Foreign.pm Sat May 8 11:31:58 2010
@@ -270,7 +270,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Metadata.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Metadata.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Metadata.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Metadata.pm Sat May 8 11:31:58 2010
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '3.64';
+our $VERSION = '3.65';
$VERSION = eval $VERSION;
# Stores method metadata
@@ -99,7 +99,7 @@
### Object Interface ###
-use Object::InsideOut 3.64;
+use Object::InsideOut 3.65;
my @CLASSES :Field;
my @FOREIGN :Field;
@@ -268,7 +268,7 @@
=head1 VERSION
-This document describes Object::InsideOut::Metadata version 3.64
+This document describes Object::InsideOut::Metadata version 3.65
=head1 SYNOPSIS
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Overload.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Overload.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Overload.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Overload.pm Sat May 8 11:31:58 2010
@@ -83,7 +83,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Secure.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Secure.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Secure.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Secure.pm Sat May 8 11:31:58 2010
@@ -2,10 +2,10 @@
use strict;
use warnings;
- our $VERSION = '3.64';
+ our $VERSION = '3.65';
$VERSION = eval $VERSION;
- use Object::InsideOut 3.64 ':hash_only';
+ use Object::InsideOut 3.65 ':hash_only';
# Holds used IDs
my %used :Field = ( 0 => undef );
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Universal.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Universal.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Universal.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Universal.pm Sat May 8 11:31:58 2010
@@ -211,7 +211,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Util.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Util.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/Util.pm Sat May 8 11:31:58 2010
@@ -5,10 +5,10 @@
use strict;
use warnings;
-our $VERSION = '3.64';
+our $VERSION = '3.65';
$VERSION = eval $VERSION;
-use Object::InsideOut::Metadata 3.64;
+use Object::InsideOut::Metadata 3.65;
### Module Initialization ###
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/attributes.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/attributes.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/attributes.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/attributes.pm Sat May 8 11:31:58 2010
@@ -79,7 +79,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/lvalue.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/lvalue.pm?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/lvalue.pm (original)
+++ branches/upstream/libobject-insideout-perl/current/lib/Object/InsideOut/lvalue.pm Sat May 8 11:31:58 2010
@@ -157,7 +157,7 @@
# Ensure correct versioning
-($Object::InsideOut::VERSION == 3.64)
+($Object::InsideOut::VERSION == 3.65)
or die("Version mismatch\n");
# EOF
Modified: branches/upstream/libobject-insideout-perl/current/t/27-exception.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libobject-insideout-perl/current/t/27-exception.t?rev=57656&op=diff
==============================================================================
--- branches/upstream/libobject-insideout-perl/current/t/27-exception.t (original)
+++ branches/upstream/libobject-insideout-perl/current/t/27-exception.t Sat May 8 11:31:58 2010
@@ -73,7 +73,12 @@
my $obj = Foo->new('DEST' => 1);
ok($obj && !$@ && !@errs, 'Have object');
undef($obj);
- like($@, qr/Die in destruct/, 'Die in destroy');
+ if ($] < 5.013) {
+ ok($@, 'Got destroy exception');
+ like($@, qr/Die in destruct/, 'Die in destroy');
+ } else {
+ ok(! $@, 'No destroy exception');
+ }
like($errs[0], qr/Die in destruct/, 'Die in destroy warning');
undef($@); @errs = ();
}
@@ -82,8 +87,12 @@
my $obj = eval { Foo->new('INIT' => 1, 'DEST' => 1); };
ok(! $obj, 'No object');
like($@->Error(), qr/Die in init/, 'Die in init');
- like($@->Chain()->Error(), qr/Die in destruct/, 'Combined errors');
- ok(! @errs, 'No warnings');
+ if ($] < 5.013) {
+ like($@->Chain()->Error(), qr/Die in destruct/, 'Combined errors');
+ ok(! @errs, 'No warnings');
+ } else {
+ like($errs[0], qr/Die in destruct/, 'Die in destroy warning');
+ }
undef($@); @errs = ();
}
More information about the Pkg-perl-cvs-commits
mailing list