Make tests match the order of the instructions for test 05
Dave Rolsky [Fri, 9 Jul 2010 14:49:48 +0000 (09:49 -0500)]
moose-class/exercises/t/lib/MooseClass/Tests.pm

index 2c95212..23cf3ab 100644 (file)
@@ -162,8 +162,6 @@ EOF
 
 sub tests05 {
     has_meta('Person');
-    has_meta('Employee');
-    no_droppings('Employee');
 
     for my $attr_name (qw( first_name last_name title )) {
         my $attr = Person->meta->get_attribute($attr_name);
@@ -178,6 +176,8 @@ sub tests05 {
         );
     }
 
+    has_meta('Employee');
+
     {
         my $salary_level_attr = Employee->meta->get_attribute('salary_level');
         ok(
@@ -254,6 +254,8 @@ sub tests05 {
             );
         }
     }
+
+    no_droppings('Employee');
 }
 
 sub tests06 {