X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fautouse.t;h=d4ca15a272e0b927f8f0ff0bf78d05705280545d;hb=e63b33793c3cf76a134a6446d1f83479e030a15f;hp=b81a40f8261bc81fc0dc07041da11956686c489c;hpb=43bd726c03df84f00c3dd8d8587f30fbdb1b8518;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/autouse.t b/lib/autouse.t
index b81a40f..d4ca15a 100644
--- a/lib/autouse.t
+++ b/lib/autouse.t
@@ -56,7 +56,7 @@ use autouse 'Errno' => qw(EPERM);
 
 my $mod_file = 'Errno.pm';   # just fine and portable for %INC
 ok( !exists $INC{$mod_file} );
-ok( EPERM, 1 );
+ok( EPERM ); # test if non-zero
 ok( exists $INC{$mod_file} );
 
 use autouse Env => "something";