X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F90ensure_class_loaded.t;h=1746d4c2cf370386cd4796efbce2ddd9649c3b48;hb=4549ba4966c026a49409c7dde70f32b2512250b0;hp=1f28a7e6b49c3b08ece4169b02b28367ad95e338;hpb=624764ae1ce59b1019d58cae509600e38eac5ff6;p=dbsrgits%2FDBIx-Class.git 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') };