--- trunk/t/01-frey-mirror.t	2008/11/26 05:14:27	531
+++ trunk/t/01-frey-mirror.t	2008/11/26 07:57:12	532
@@ -7,7 +7,7 @@
 
 use Data::Dump qw/dump/;
 
-my $debug = 1 if @ARGV;
+my $debug = @ARGV ? 1 : 0;
 
 BEGIN {
 	use_ok('Frey::Mirror');