Fudge one test a little

hinrik · Jul 2, 2009 · 3a3ca02 · 3a3ca02
1 parent 1dbcda2
commit 3a3ca02
Showing 1 changed file with 7 additions and 5 deletions.
diff --git a/t/03_opts/06_index.t b/t/03_opts/06_index.t
@@ -1,13 +1,15 @@
 use strict;
 use warnings;
 use File::Spec::Functions 'catfile';
-use Test::More tests => 4;
+use Test::More tests => 6;
 
 my $script = catfile('script', 'grok');
 my $index_short = qx/$^X $script -i/;
 my $index_long  = qx/$^X $script --index/;
 
-like($index_short, qr/^S02/m, 'Found synopsis in index (-i)');
-like($index_long, qr/^S02/m, 'Found synopsis in (--index)');
-like($index_short, qr/^say\b/m, 'Found function in index (-i)');
-like($index_long, qr/^sleep\b/m, 'Found function in (--index)');
+like($index_short, qr/^S02/m,     'Found Synopsis 2 in index (-i)');
+like($index_long,  qr/^S02/m,     'Found Synopsis 2 in index (--index)');
+like($index_short, qr/^say\b/m,   'Found say() in index (-i)');
+like($index_long,  qr/^say\b/m,   'Found say() in index (--index)');
+like($index_short, qr/^sleep\b/m, 'Found sleep() in index (-i)');
+like($index_long,  qr/^sleep\b/m, 'Found sleep() in index (--index)');