Checking in changes prior to tagging of version 0.77. 0.77
Fuji, Goro [Wed, 29 Sep 2010 12:36:57 +0000 (21:36 +0900)]
Changelog diff is:

diff --git a/Changes b/Changes
index 19343fb..29e615e 100644
--- a/Changes
+++ b/Changes
@@ -1,7 +1,8 @@
 Revision history for Mouse

-0.77
+0.77 Wed Sep 29 21:35:11 2010
     [BUG FIXES]
+    * Fix tests failed against 5.6.2
     * Combination of 'isa' and 'does' for has() sugar was incorrectly
       proccessed in Mouse::PurePerl.
     * Fix foreign class checking routines. Please update MouseX::Foreign.

25 files changed:
Changes
lib/Mouse.pm
lib/Mouse/Exporter.pm
lib/Mouse/Meta/Attribute.pm
lib/Mouse/Meta/Class.pm
lib/Mouse/Meta/Method.pm
lib/Mouse/Meta/Method/Accessor.pm
lib/Mouse/Meta/Method/Constructor.pm
lib/Mouse/Meta/Method/Delegation.pm
lib/Mouse/Meta/Method/Destructor.pm
lib/Mouse/Meta/Module.pm
lib/Mouse/Meta/Role.pm
lib/Mouse/Meta/Role/Application.pm
lib/Mouse/Meta/Role/Composite.pm
lib/Mouse/Meta/Role/Method.pm
lib/Mouse/Meta/TypeConstraint.pm
lib/Mouse/Object.pm
lib/Mouse/PurePerl.pm
lib/Mouse/Role.pm
lib/Mouse/Spec.pm
lib/Mouse/Tiny.pod
lib/Mouse/Util.pm
lib/Mouse/Util/TypeConstraints.pm
lib/Mouse/XS.pod
t/001_mouse/028-subclass-attr.t

diff --git a/Changes b/Changes
index 19343fb..29e615e 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,7 +1,8 @@
 Revision history for Mouse
 
-0.77
+0.77 Wed Sep 29 21:35:11 2010
     [BUG FIXES]
+    * Fix tests failed against 5.6.2
     * Combination of 'isa' and 'does' for has() sugar was incorrectly
       proccessed in Mouse::PurePerl.
     * Fix foreign class checking routines. Please update MouseX::Foreign.
index 7e927f3..d698f40 100644 (file)
@@ -3,7 +3,7 @@ use 5.006_002;
 
 use Mouse::Exporter; # enables strict and warnings
 
-our $VERSION = '0.76';
+our $VERSION = '0.77';
 
 use Carp         qw(confess);
 use Scalar::Util qw(blessed);
@@ -155,7 +155,7 @@ Mouse - Moose minus the antlers
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SYNOPSIS
 
index 8e80496..38e2bea 100644 (file)
@@ -268,7 +268,7 @@ Mouse::Exporter - make an import() and unimport() just like Mouse.pm
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SYNOPSIS
 
index 9adf694..a37601d 100644 (file)
@@ -342,7 +342,7 @@ Mouse::Meta::Attribute - The Mouse attribute metaclass
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index 717f025..ac4225a 100644 (file)
@@ -468,7 +468,7 @@ Mouse::Meta::Class - The Mouse class metaclass
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index 14225d3..e6106f7 100644 (file)
@@ -54,7 +54,7 @@ Mouse::Meta::Method - A Mouse Method metaclass
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index e50e4f8..b3545bd 100644 (file)
@@ -183,7 +183,7 @@ Mouse::Meta::Method::Accessor - A Mouse method generator for accessors
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index 7a3120a..87e00c7 100644 (file)
@@ -232,7 +232,7 @@ Mouse::Meta::Method::Constructor - A Mouse method generator for constructors
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index 3757ffc..a566a0a 100644 (file)
@@ -61,7 +61,7 @@ Mouse::Meta::Method::Delegation - A Mouse method generator for delegation method
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index 816e29b..1e85057 100644 (file)
@@ -65,7 +65,7 @@ Mouse::Meta::Method::Destructor - A Mouse method generator for destructors
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index 336d174..fca3778 100644 (file)
@@ -315,7 +315,7 @@ Mouse::Meta::Module - The common base class of Mouse::Meta::Class and Mouse::Met
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index 3858f34..7dcfe30 100644 (file)
@@ -131,7 +131,7 @@ Mouse::Meta::Role - The Mouse Role metaclass
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index f607d7e..09396a9 100644 (file)
@@ -206,7 +206,7 @@ Mouse::Meta::Role::Application - The Mouse role application class
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index 0cd85b3..1528ce5 100644 (file)
@@ -156,7 +156,7 @@ Mouse::Meta::Role::Composite - An object to represent the set of roles
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index fcd4237..0317df8 100644 (file)
@@ -23,7 +23,7 @@ Mouse::Meta::Role::Method - A Mouse Method metaclass for Roles
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index bffc3a1..b703f32 100644 (file)
@@ -234,7 +234,7 @@ Mouse::Meta::TypeConstraint - The Mouse Type Constraint metaclass
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index b85581e..0ad8f54 100644 (file)
@@ -10,7 +10,7 @@ Mouse::Object - The base object for Mouse classes
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 METHODS
 
index 31a9647..d3fb64f 100644 (file)
@@ -744,7 +744,7 @@ Mouse::PurePerl - A Mouse guts in pure Perl
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SEE ALSO
 
index e0bfca4..acf5782 100644 (file)
@@ -1,7 +1,7 @@
 package Mouse::Role;
 use Mouse::Exporter; # enables strict and warnings
 
-our $VERSION = '0.76';
+our $VERSION = '0.77';
 
 use Carp         qw(confess);
 use Scalar::Util qw(blessed);
@@ -137,7 +137,7 @@ Mouse::Role - The Mouse Role
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SYNOPSIS
 
index 7190f1e..7cc461f 100644 (file)
@@ -2,7 +2,7 @@ package Mouse::Spec;
 use strict;
 use warnings;
 
-our $VERSION = '0.76';
+our $VERSION = '0.77';
 
 our $MouseVersion = $VERSION;
 our $MooseVersion = '1.13';
@@ -19,7 +19,7 @@ Mouse::Spec - To what extent Mouse is compatible with Moose
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SYNOPSIS
 
index 3e9f4c9..f7cab4e 100644 (file)
@@ -5,7 +5,7 @@ Mouse::Tiny - Mouse in a single file
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index d51ada0..7b4621b 100644 (file)
@@ -48,7 +48,7 @@ BEGIN{
         },
     );
 
-    our $VERSION = '0.76';
+    our $VERSION = '0.77';
 
     my $xs = !(defined(&is_valid_class_name) || $ENV{MOUSE_PUREPERL} || $ENV{PERL_ONLY});
 
@@ -388,7 +388,7 @@ Mouse::Util - Utilities for working with Mouse classes
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 SYNOPSIS
 
index 808bb6b..2a618d9 100644 (file)
@@ -427,7 +427,7 @@ Mouse::Util::TypeConstraints - Type constraint system for Mouse
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head2 SYNOPSIS
 
index 7610927..c329579 100644 (file)
@@ -5,7 +5,7 @@ Mouse::XS - A Mouse guts in XS
 
 =head1 VERSION
 
-This document describes Mouse version 0.76
+This document describes Mouse version 0.77
 
 =head1 DESCRIPTION
 
index 27abb63..35430a5 100644 (file)
@@ -34,7 +34,7 @@ do {
     extends qw(CB CA);
     has cc => (is => 'rw');
 };
-with_immutable sub {
+with_immutable {
     my $obj = Child->new(class => 1, child => 1);
     ok($obj->child, "local attribute set in constructor");
     ok($obj->class, "inherited attribute set in constructor");
@@ -50,7 +50,7 @@ with_immutable sub {
         CA->meta->get_attribute('ca'),
         Class->meta->get_attribute('class'),
     )], "correct get_all_attributes");
-}, qw(Class CA CB CC);
+} 'Class', 'CA', 'CB', 'CC';
 
 do {
     package Foo;
@@ -90,7 +90,7 @@ with_immutable {
     is_deeply([Bar->meta->get_all_attributes], [
         Bar->meta->get_attribute('attr'),
     ], "correct get_all_attributes");
-} qw(Foo Bar);
+} 'Foo', 'Bar';
 
 done_testing;