--- trunk/t/21-frey-web-links.t	2008/11/26 05:14:27	531
+++ trunk/t/21-frey-web-links.t	2008/11/26 07:57:12	532
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-my $debug = shift @ARGV;
+my $debug = @ARGV ? 1 : 0;
 
 use Test::More tests => 7;
 use lib 'lib';