From: Stevan Little Date: Sun, 17 Feb 2008 16:21:31 +0000 (+0000) Subject: test tweaks X-Git-Tag: 0_64~87 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=10dd437b9a873b2fcbe64d908fcad09546480fd4;p=gitmo%2FClass-MOP.git test tweaks --- diff --git a/Changes b/Changes index 5b36c67..66fece4 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,13 @@ Revision history for Perl extension Class-MOP. +0.54 + * t/ + - fixed the filename length on several + test files so we install on VMS better + (RT #32295) + - fixed incorrect use of catdir when it + should be catfile (RT #32385) + 0.53 Thurs. Feb. 14, 1008 ~~ several doc. fixes and updates ~~ diff --git a/MANIFEST b/MANIFEST index 3c3eb9c..59b8deb 100644 --- a/MANIFEST +++ b/MANIFEST @@ -30,11 +30,12 @@ lib/Class/MOP/Module.pm lib/Class/MOP/Object.pm lib/Class/MOP/Package.pm lib/metaclass.pm -MOP.xs -ppport.h Makefile.PL MANIFEST +MANIFEST.SKIP META.yml +MOP.xs +ppport.h README scripts/class_browser.pl t/000_load.t @@ -58,14 +59,16 @@ t/020_attribute.t t/021_attribute_errors_and_edge_cases.t t/022_attribute_duplication.t t/023_attribute_get_read_write.t +t/024_attribute_initializer.t t/030_method.t t/031_method_modifiers.t t/040_metaclass.t t/041_metaclass_incompatability.t -t/042_metaclass_incompatibility_dynamic.t -t/043_instance_metaclass_incompatibility.t -t/044_instance_metaclass_incompatibility_dynamic.t +t/042_metaclass_incompatibility_dyn.t +t/043_instance_metaclass_incompat.t +t/044_instance_metaclass_incompat_dyn.t t/045_metaclass_loads_classes.t +t/046_rebless_instance.t t/050_scala_style_mixin_composition.t t/060_instance.t t/061_instance_inline.t @@ -75,6 +78,7 @@ t/072_immutable_w_constructors.t t/073_make_mutable.t t/080_meta_package.t t/081_meta_package_extension.t +t/082_get_code_info.t t/100_BinaryTree_test.t t/101_InstanceCountingClass_test.t t/102_InsideOutClass_test.t diff --git a/MANIFEST.SKIP b/MANIFEST.SKIP index da5b66e..d5c63f3 100644 --- a/MANIFEST.SKIP +++ b/MANIFEST.SKIP @@ -4,7 +4,6 @@ ^blib ~$ \.bak$ -^MANIFEST\.SKIP$ CVS \.svn \.DS_Store @@ -17,4 +16,5 @@ bench ^blibdirs$ \.old$ ^#.*#$ -^\.# \ No newline at end of file +^\.# +^TODO$ \ No newline at end of file diff --git a/README b/README index cc7f15a..4eea3e1 100644 --- a/README +++ b/README @@ -1,4 +1,4 @@ -Class::MOP version 0.53 +Class::MOP version 0.54 =========================== See the individual module documentation for more information diff --git a/lib/Class/MOP.pm b/lib/Class/MOP.pm index f5db6bd..619fca7 100644 --- a/lib/Class/MOP.pm +++ b/lib/Class/MOP.pm @@ -14,7 +14,7 @@ use Class::MOP::Method; use Class::MOP::Immutable; BEGIN { - our $VERSION = '0.53'; + our $VERSION = '0.54'; our $AUTHORITY = 'cpan:STEVAN'; use XSLoader; diff --git a/t/042_metaclass_incompatibility_dynamic.t b/t/042_metaclass_incompatibility_dyn.t similarity index 100% rename from t/042_metaclass_incompatibility_dynamic.t rename to t/042_metaclass_incompatibility_dyn.t diff --git a/t/043_instance_metaclass_incompatibility.t b/t/043_instance_metaclass_incompat.t similarity index 100% rename from t/043_instance_metaclass_incompatibility.t rename to t/043_instance_metaclass_incompat.t diff --git a/t/044_instance_metaclass_incompatibility_dynamic.t b/t/044_instance_metaclass_incompat_dyn.t similarity index 100% rename from t/044_instance_metaclass_incompatibility_dynamic.t rename to t/044_instance_metaclass_incompat_dyn.t diff --git a/t/046-rebless.t b/t/046_rebless_instance.t similarity index 100% rename from t/046-rebless.t rename to t/046_rebless_instance.t diff --git a/t/101_InstanceCountingClass_test.t b/t/101_InstanceCountingClass_test.t index 0cc7b7a..0d422b2 100644 --- a/t/101_InstanceCountingClass_test.t +++ b/t/101_InstanceCountingClass_test.t @@ -8,7 +8,7 @@ use File::Spec; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'InstanceCountingClass.pod')); + require_ok(File::Spec->catfile('examples', 'InstanceCountingClass.pod')); } =pod diff --git a/t/102_InsideOutClass_test.t b/t/102_InsideOutClass_test.t index 615203d..a29f00c 100644 --- a/t/102_InsideOutClass_test.t +++ b/t/102_InsideOutClass_test.t @@ -9,7 +9,7 @@ use Scalar::Util 'reftype'; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'InsideOutClass.pod')); + require_ok(File::Spec->catfile('examples', 'InsideOutClass.pod')); } { diff --git a/t/103_Perl6Attribute_test.t b/t/103_Perl6Attribute_test.t index d9e77bf..3b14e26 100644 --- a/t/103_Perl6Attribute_test.t +++ b/t/103_Perl6Attribute_test.t @@ -8,7 +8,7 @@ use File::Spec; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'Perl6Attribute.pod')); + require_ok(File::Spec->catfile('examples', 'Perl6Attribute.pod')); } { diff --git a/t/104_AttributesWithHistory_test.t b/t/104_AttributesWithHistory_test.t index 5b74faa..741e388 100644 --- a/t/104_AttributesWithHistory_test.t +++ b/t/104_AttributesWithHistory_test.t @@ -8,7 +8,7 @@ use File::Spec; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'AttributesWithHistory.pod')); + require_ok(File::Spec->catfile('examples', 'AttributesWithHistory.pod')); } { diff --git a/t/105_ClassEncapsulatedAttributes_test.t b/t/105_ClassEncapsulatedAttributes_test.t index 57b9760..0f1047d 100644 --- a/t/105_ClassEncapsulatedAttributes_test.t +++ b/t/105_ClassEncapsulatedAttributes_test.t @@ -8,7 +8,7 @@ use File::Spec; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'ClassEncapsulatedAttributes.pod')); + require_ok(File::Spec->catfile('examples', 'ClassEncapsulatedAttributes.pod')); } { diff --git a/t/106_LazyClass_test.t b/t/106_LazyClass_test.t index f457f55..866cbe1 100644 --- a/t/106_LazyClass_test.t +++ b/t/106_LazyClass_test.t @@ -8,7 +8,7 @@ use File::Spec; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'LazyClass.pod')); + require_ok(File::Spec->catfile('examples', 'LazyClass.pod')); } { diff --git a/t/107_C3MethodDispatchOrder_test.t b/t/107_C3MethodDispatchOrder_test.t index 2911e18..c00f037 100644 --- a/t/107_C3MethodDispatchOrder_test.t +++ b/t/107_C3MethodDispatchOrder_test.t @@ -12,7 +12,7 @@ BEGIN { plan tests => 5; use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'C3MethodDispatchOrder.pod')); + require_ok(File::Spec->catfile('examples', 'C3MethodDispatchOrder.pod')); } { diff --git a/t/108_ArrayBasedStorage_test.t b/t/108_ArrayBasedStorage_test.t index 43e079f..efedf25 100644 --- a/t/108_ArrayBasedStorage_test.t +++ b/t/108_ArrayBasedStorage_test.t @@ -9,7 +9,7 @@ use Scalar::Util 'reftype'; BEGIN { use_ok('Class::MOP'); - require_ok(File::Spec->catdir('examples', 'ArrayBasedStorage.pod')); + require_ok(File::Spec->catfile('examples', 'ArrayBasedStorage.pod')); } {