r35363 - in /branches/upstream/libmoose-perl/current: ./ lib/ lib/Moose/ lib/Moose/Error/ lib/Moose/Meta/ lib/Moose/Meta/Class/Immutable/ lib/Moose/Meta/Method/ lib/Moose/Meta/Role/ lib/Moose/Meta/Role/Application/ lib/Moose/Meta/Role/Method/ lib/Moose/Meta/TypeCoercion/ lib/Moose/Meta/TypeConstraint/ lib/Moose/Util/ lib/Moose/Util/TypeConstraints/ lib/Test/ t/010_basics/
bricas-guest at users.alioth.debian.org
bricas-guest at users.alioth.debian.org
Wed May 13 18:52:35 UTC 2009
Author: bricas-guest
Date: Wed May 13 18:52:29 2009
New Revision: 35363
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=35363
Log:
[svn-upgrade] Integrating new upstream version, libmoose-perl (0.79)
Added:
branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction-helper.pl
Modified:
branches/upstream/libmoose-perl/current/Changes
branches/upstream/libmoose-perl/current/MANIFEST
branches/upstream/libmoose-perl/current/META.yml
branches/upstream/libmoose-perl/current/README
branches/upstream/libmoose-perl/current/lib/Moose.pm
branches/upstream/libmoose-perl/current/lib/Moose/Error/Confess.pm
branches/upstream/libmoose-perl/current/lib/Moose/Error/Croak.pm
branches/upstream/libmoose-perl/current/lib/Moose/Error/Default.pm
branches/upstream/libmoose-perl/current/lib/Moose/Exporter.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Attribute.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class/Immutable/Trait.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Instance.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Accessor.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Augmented.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Constructor.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Delegation.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Destructor.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Overridden.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/RoleSummation.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToClass.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToInstance.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToRole.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Composite.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method/Required.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion/Union.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Class.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Enum.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterizable.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterized.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Registry.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Role.pm
branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Union.pm
branches/upstream/libmoose-perl/current/lib/Moose/Object.pm
branches/upstream/libmoose-perl/current/lib/Moose/Role.pm
branches/upstream/libmoose-perl/current/lib/Moose/Util.pm
branches/upstream/libmoose-perl/current/lib/Moose/Util/MetaRole.pm
branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints.pm
branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints/OptimizedConstraints.pm
branches/upstream/libmoose-perl/current/lib/Test/Moose.pm
branches/upstream/libmoose-perl/current/lib/oose.pm
branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction.t
Modified: branches/upstream/libmoose-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/Changes?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/Changes (original)
+++ branches/upstream/libmoose-perl/current/Changes Wed May 13 18:52:29 2009
@@ -1,5 +1,15 @@
Also see Moose::Manual::Delta for more details of, and workarounds
for, noteworthy changes.
+
+0.79 Wed, May 13, 2009
+ * Tests
+ - More fixes for Win32 problems. Reported by Robert Krimen.
+
+ * Moose::Object
+ - The DEMOLISHALL method could still blow up in some cases
+ during global destruction. This method has been made more
+ resilient in the face of global destruction's random garbage
+ collection order.
0.78 Tue, May 12, 2009
* Moose::Cookbook::FAQ and Moose::Cookbook::WTF
Modified: branches/upstream/libmoose-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/MANIFEST?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/MANIFEST (original)
+++ branches/upstream/libmoose-perl/current/MANIFEST Wed May 13 18:52:29 2009
@@ -143,6 +143,7 @@
t/010_basics/017_error_handling.t
t/010_basics/018_methods.t
t/010_basics/019-destruction.t
+t/010_basics/020-global-destruction-helper.pl
t/010_basics/020-global-destruction.t
t/020_attributes/001_attribute_reader_generation.t
t/020_attributes/002_attribute_writer_generation.t
Modified: branches/upstream/libmoose-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/META.yml?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/META.yml (original)
+++ branches/upstream/libmoose-perl/current/META.yml Wed May 13 18:52:29 2009
@@ -32,4 +32,4 @@
perl: 5.8.1
resources:
license: http://dev.perl.org/licenses/
-version: 0.78
+version: 0.79
Modified: branches/upstream/libmoose-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/README?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/README (original)
+++ branches/upstream/libmoose-perl/current/README Wed May 13 18:52:29 2009
@@ -1,4 +1,4 @@
-Moose version 0.78
+Moose version 0.79
===========================
See the individual module documentation for more information
Modified: branches/upstream/libmoose-perl/current/lib/Moose.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use 5.008;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Error/Confess.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Error/Confess.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Error/Confess.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Error/Confess.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Error/Croak.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Error/Croak.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Error/Croak.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Error/Croak.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Error/Default.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Error/Default.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Error/Default.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Error/Default.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Exporter.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Exporter.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Exporter.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Exporter.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Attribute.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Attribute.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Attribute.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Attribute.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Scalar::Util 'blessed', 'weaken';
use overload ();
-our $VERSION = '0.78';
+our $VERSION = '0.79';
our $AUTHORITY = 'cpan:STEVAN';
use Moose::Meta::Method::Accessor;
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class.pm Wed May 13 18:52:29 2009
@@ -11,7 +11,7 @@
use List::MoreUtils qw( any all uniq first_index );
use Scalar::Util 'weaken', 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class/Immutable/Trait.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class/Immutable/Trait.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class/Immutable/Trait.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Class/Immutable/Trait.pm Wed May 13 18:52:29 2009
@@ -5,7 +5,7 @@
use Class::MOP;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Instance.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Instance.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Instance.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Instance.pm Wed May 13 18:52:29 2009
@@ -4,7 +4,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Accessor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Accessor.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Accessor.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Accessor.pm Wed May 13 18:52:29 2009
@@ -4,7 +4,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Augmented.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Augmented.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Augmented.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Augmented.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Constructor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Constructor.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Constructor.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Constructor.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Scalar::Util 'blessed', 'weaken', 'looks_like_number', 'refaddr';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
our $AUTHORITY = 'cpan:STEVAN';
use base 'Moose::Meta::Method',
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Delegation.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Delegation.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Delegation.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Delegation.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Carp 'confess';
use Scalar::Util 'blessed', 'weaken';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Destructor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Destructor.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Destructor.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Destructor.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Scalar::Util 'blessed', 'weaken';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Overridden.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Overridden.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Overridden.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Method/Overridden.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role.pm Wed May 13 18:52:29 2009
@@ -10,7 +10,7 @@
use Sub::Name 'subname';
use Devel::GlobalDestruction 'in_global_destruction';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application.pm Wed May 13 18:52:29 2009
@@ -4,7 +4,7 @@
use warnings;
use metaclass;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/RoleSummation.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/RoleSummation.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/RoleSummation.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/RoleSummation.pm Wed May 13 18:52:29 2009
@@ -9,7 +9,7 @@
use Moose::Meta::Role::Composite;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToClass.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToClass.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToClass.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToClass.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Moose::Util 'english_list';
use Scalar::Util 'weaken', 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToInstance.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToInstance.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToInstance.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToInstance.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Scalar::Util 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToRole.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToRole.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToRole.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Application/ToRole.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Scalar::Util 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Composite.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Composite.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Composite.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Composite.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Scalar::Util 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method.pm Wed May 13 18:52:29 2009
@@ -4,7 +4,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method/Required.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method/Required.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method/Required.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/Role/Method/Required.pm Wed May 13 18:52:29 2009
@@ -4,7 +4,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion.pm Wed May 13 18:52:29 2009
@@ -8,7 +8,7 @@
use Moose::Meta::Attribute;
use Moose::Util::TypeConstraints ();
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion/Union.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion/Union.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion/Union.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeCoercion/Union.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Scalar::Util 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint.pm Wed May 13 18:52:29 2009
@@ -13,7 +13,7 @@
use base qw(Class::MOP::Object);
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Class.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Class.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Class.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Scalar::Util 'blessed';
use Moose::Util::TypeConstraints ();
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Enum.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Enum.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Enum.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Enum.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Moose::Util::TypeConstraints ();
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterizable.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterizable.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterizable.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterizable.pm Wed May 13 18:52:29 2009
@@ -4,7 +4,7 @@
use warnings;
use metaclass;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterized.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterized.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterized.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Parameterized.pm Wed May 13 18:52:29 2009
@@ -8,7 +8,7 @@
use Moose::Util::TypeConstraints;
use Moose::Meta::TypeConstraint::Parameterizable;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Registry.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Registry.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Registry.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Registry.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Scalar::Util 'blessed';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Role.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Role.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Role.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Role.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Scalar::Util 'blessed';
use Moose::Util::TypeConstraints ();
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Union.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Union.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Union.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Meta/TypeConstraint/Union.pm Wed May 13 18:52:29 2009
@@ -7,7 +7,7 @@
use Moose::Meta::TypeCoercion::Union;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Object.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Object.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Object.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Object.pm Wed May 13 18:52:29 2009
@@ -4,13 +4,14 @@
use strict;
use warnings;
+use Devel::GlobalDestruction qw(in_global_destruction);
+use MRO::Compat;
use Scalar::Util;
-use Devel::GlobalDestruction qw(in_global_destruction);
use if ( not our $__mx_is_compiled ), 'Moose::Meta::Class';
use if ( not our $__mx_is_compiled ), metaclass => 'Moose::Meta::Class';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
@@ -64,17 +65,19 @@
# extra meta level calls
return unless $self->can('DEMOLISH');
- # This is a hack, because Moose::Meta::Class may not be the right
- # metaclass, but class_of may return undef during global
- # destruction, if the metaclass object has already been cleaned
- # up.
- my $meta = Class::MOP::class_of($self)
- || Moose::Meta::Class->initialize( ref $self );
-
- # can't just use find_all_methods_by_name here because during global
- # destruction, the method meta-object may have already been
- # destroyed
- foreach my $class ( $meta->linearized_isa ) {
+ my @isa;
+ if ( my $meta = Class::MOP::class_of($self ) ) {
+ @isa = $meta->linearized_isa;
+ } else {
+ # We cannot count on being able to retrieve a previously made
+ # metaclass, _or_ being able to make a new one during global
+ # destruction. However, we should still be able to use mro at
+ # that time (at least tests suggest so ;)
+ my $class_name = ref $self;
+ @isa = @{ mro::get_linear_isa($class_name) }
+ }
+
+ foreach my $class (@isa) {
no strict 'refs';
my $demolish = *{"${class}::DEMOLISH"}{CODE};
$self->$demolish($in_global_destruction)
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Role.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Role.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Role.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Role.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Sub::Exporter;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Util.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Util.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Util.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Util.pm Wed May 13 18:52:29 2009
@@ -8,7 +8,7 @@
use Scalar::Util 'blessed';
use Class::MOP 0.60;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Util/MetaRole.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Util/MetaRole.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Util/MetaRole.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Util/MetaRole.pm Wed May 13 18:52:29 2009
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Scalar::Util qw( blessed reftype );
use Moose::Exporter;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints/OptimizedConstraints.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints/OptimizedConstraints.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints/OptimizedConstraints.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Moose/Util/TypeConstraints/OptimizedConstraints.pm Wed May 13 18:52:29 2009
@@ -6,7 +6,7 @@
use Class::MOP;
use Scalar::Util 'blessed', 'looks_like_number';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/Test/Moose.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/Test/Moose.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/Test/Moose.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/Test/Moose.pm Wed May 13 18:52:29 2009
@@ -8,7 +8,7 @@
use Moose::Util 'does_role', 'find_meta';
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Modified: branches/upstream/libmoose-perl/current/lib/oose.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/lib/oose.pm?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/lib/oose.pm (original)
+++ branches/upstream/libmoose-perl/current/lib/oose.pm Wed May 13 18:52:29 2009
@@ -5,7 +5,7 @@
use Class::MOP;
-our $VERSION = '0.78';
+our $VERSION = '0.79';
$VERSION = eval $VERSION;
our $AUTHORITY = 'cpan:STEVAN';
Added: branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction-helper.pl
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction-helper.pl?rev=35363&op=file
==============================================================================
--- branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction-helper.pl (added)
+++ branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction-helper.pl Wed May 13 18:52:29 2009
@@ -1,0 +1,19 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+
+{
+ package Foo;
+ use Moose;
+
+ sub DEMOLISH {
+ my $self = shift;
+ my ($igd) = @_;
+
+ print $igd;
+ }
+}
+
+our $foo = Foo->new;
Modified: branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction.t?rev=35363&op=diff
==============================================================================
--- branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction.t (original)
+++ branches/upstream/libmoose-perl/current/t/010_basics/020-global-destruction.t Wed May 13 18:52:29 2009
@@ -5,30 +5,24 @@
use Test::More tests => 2;
-our $expected_igd = 0;
-package Foo;
-use Moose;
+{
+ package Foo;
+ use Moose;
-sub DEMOLISH {
- my $self = shift;
- my ($igd) = @_;
- ::is($igd, $::expected_igd,
- "in_global_destruction state is passed to DEMOLISH properly");
+ sub DEMOLISH {
+ my $self = shift;
+ my ($igd) = @_;
+ ::ok(
+ !$igd,
+ 'in_global_destruction state is passed to DEMOLISH properly (false)'
+ );
+ }
}
-package main;
{
my $foo = Foo->new;
}
-$expected_igd = 1;
-# Test::Builder checks for a valid plan at END time, which is before global
-# destruction, so need to test that in a subprocess
-unless (fork) {
- our $foo = Foo->new;
- exit;
-}
-wait;
-# but stuff that happens in a subprocess doesn't update Test::Builder's state
-# in this process, so do that manually here
-my $builder = Test::More->builder;
-$builder->current_test($builder->current_test + 1);
+
+my $igd = `$^X t/010_basics/020-global-destruction-helper.pl`;
+ok( $igd,
+ 'in_global_destruction state is passed to DEMOLISH properly (true)' );
More information about the Pkg-perl-cvs-commits
mailing list