X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F001_mouse%2F020-load-class.t;h=311acd8f1de9362aa04f02e086eefece3ad1525a;hp=705c0db9ab33154301003fc176a90032a3cf77a7;hb=2a9a2118c30734915b9fb32521e6516c5a41992b;hpb=42108e9ca4e2394e54f76bdcde4bfd34eacfd646 diff --git a/t/001_mouse/020-load-class.t b/t/001_mouse/020-load-class.t index 705c0db..311acd8 100644 --- a/t/001_mouse/020-load-class.t +++ b/t/001_mouse/020-load-class.t @@ -7,11 +7,11 @@ use Test::Exception; require Mouse; use lib 't/lib'; -ok(!Mouse::is_class_loaded(), "is_class_loaded with no argument returns false"); +ok(!Mouse::is_class_loaded(undef), "is_class_loaded with undef returns false"); ok(!Mouse::is_class_loaded(''), "can't load the empty class"); ok(!Mouse::is_class_loaded(\"foo"), "can't load a class name reference??"); -throws_ok { Mouse::load_class() } qr/Invalid class name \(undef\)/; +throws_ok { Mouse::load_class(undef) } qr/Invalid class name \(undef\)/; throws_ok { Mouse::load_class('') } qr/Invalid class name \(\)/; throws_ok { Mouse::load_class(\"foo") } qr/Invalid class name \(SCALAR\(\w+\)\)/;