From: Dave Rolsky Date: Fri, 16 Sep 2011 14:49:22 +0000 (-0500) Subject: Add tests for explicit remove and add X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d318b35bf9a7e57a90534fd357060269add9072a;p=gitmo%2FMoose.git Add tests for explicit remove and add --- diff --git a/t/cmop/insertion_order.t b/t/cmop/insertion_order.t index e057a44..2a6cc1f 100644 --- a/t/cmop/insertion_order.t +++ b/t/cmop/insertion_order.t @@ -51,6 +51,19 @@ is($Point->get_attribute('y')->insertion_order, 1, 'Insertion order of Attribute is( $class->get_attribute('first')->insertion_order, 0, + 'insertion_order for first is still 0 after adding first (again)' + ); + + is( + $class->get_attribute('second')->insertion_order, 1, + 'insertion_order for second is still 0 after adding first (again)' + ); + + $class->remove_attribute('first'); + $class->add_attribute('first'); + + is( + $class->get_attribute('first')->insertion_order, 0, 'insertion_order for first is still 0 after removing and readding first' );