summaryrefslogtreecommitdiffstats
path: root/t
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-07-08 23:13:15 -0500
committerJesse Luehrs <doy@tozt.net>2011-07-08 23:14:27 -0500
commit6880b0945aeb93eaf7f2bc2ebb84fcadacd3d087 (patch)
tree9e32c4c7e93ff5204342f3d9562fd58c43e6088a /t
parent9174cec546b4dba5821ce29a408feb860f49c244 (diff)
downloadsmartmatch-6880b0945aeb93eaf7f2bc2ebb84fcadacd3d087.tar.gz
smartmatch-6880b0945aeb93eaf7f2bc2ebb84fcadacd3d087.zip
whoops
Diffstat (limited to 't')
-rw-r--r--t/basic.t5
1 files changed, 3 insertions, 2 deletions
diff --git a/t/basic.t b/t/basic.t
index 39b564c..545621a 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -11,14 +11,15 @@ ok(1 ~~ 1);
}
ok(1 ~~ 1);
-{
+BEGIN {
package smartmatch::engine::foo;
sub match { ref($_[1]) eq 'ARRAY' }
+ $INC{'smartmatch/engine/foo.pm'} = 1;
}
{
use smartmatch 'foo';
- ok([] ~~ qr/ARRAY/);
+ ok(1 ~~ []);
ok(!(1 ~~ sub { 0 }));
}