From: Justin Hunter Date: Wed, 22 Apr 2009 03:21:28 +0000 (+0000) Subject: un-todo these tests, load_optional_class is fixed X-Git-Tag: v0.08101~16 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=504870a5f5a33ba88c5c22cbfa41579433dd49f3;p=dbsrgits%2FDBIx-Class.git un-todo these tests, load_optional_class is fixed --- diff --git a/t/90ensure_class_loaded.t b/t/90ensure_class_loaded.t index 1f28a7e..1746d4c 100644 --- a/t/90ensure_class_loaded.t +++ b/t/90ensure_class_loaded.t @@ -64,12 +64,9 @@ like( $@, qr/did not return a true value/, q/0;/, ); - TODO: { - local $TODO = "Current load_optional_class cannot find PAR"; - $retval = eval { $schema->load_optional_class('VIRTUAL::PAR::PACKAGE') }; - ok( $@, 'load_optional_class of a no-true-returning PAR module did throw' ); - ok( !$retval, 'no-true-returning PAR package not loaded' ); - } + $retval = eval { $schema->load_optional_class('VIRTUAL::PAR::PACKAGE') }; + ok( $@, 'load_optional_class of a no-true-returning PAR module did throw' ); + ok( !$retval, 'no-true-returning PAR package not loaded' ); # simulate a normal class (no one adjusted %INC so it will be tried again @code = ( @@ -77,12 +74,9 @@ like( $@, qr/did not return a true value/, q/1;/, ); - TODO: { - local $TODO = "Current load_optional_class cannot find PARs"; - $retval = eval { $schema->load_optional_class('VIRTUAL::PAR::PACKAGE') }; - ok( !$@, 'load_optional_class of a PAR module did not throw' ); - ok( $retval, 'PAR package "loaded"' ); - } + $retval = eval { $schema->load_optional_class('VIRTUAL::PAR::PACKAGE') }; + ok( !$@, 'load_optional_class of a PAR module did not throw' ); + ok( $retval, 'PAR package "loaded"' ); # see if we can still load stuff with the coderef present $retval = eval { $schema->load_optional_class('DBIx::Class::ResultClass::HashRefInflator') };