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