From 4320e1f5d5e69a3d801093c34434c2b0822e33db Mon Sep 17 00:00:00 2001 From: jluehrs2 Date: Mon, 4 Feb 2008 07:26:36 -0500 Subject: fix skip amounts for tests if word list isn't found --- t/004-system-wordlist-nocache.t | 2 +- t/023-is-word-nocache.t | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/t/004-system-wordlist-nocache.t b/t/004-system-wordlist-nocache.t index 7396d51..39b7dd4 100644 --- a/t/004-system-wordlist-nocache.t +++ b/t/004-system-wordlist-nocache.t @@ -10,7 +10,7 @@ $word_file = '/usr/dict/words' if -r '/usr/dict/words'; $word_file = '/usr/share/dict/words' if -r '/usr/share/dict/words'; SKIP: { - skip "Can't find a system word list", 2 if $word_file eq ''; + skip "Can't find a system word list", 4 if $word_file eq ''; my $wl; lives_ok { $wl = Games::Word::Wordlist->new($word_file, cache => 0) } diff --git a/t/023-is-word-nocache.t b/t/023-is-word-nocache.t index 84fa972..47ada06 100644 --- a/t/023-is-word-nocache.t +++ b/t/023-is-word-nocache.t @@ -10,7 +10,7 @@ $word_file = '/usr/dict/words' if -r '/usr/dict/words'; $word_file = '/usr/share/dict/words' if -r '/usr/share/dict/words'; SKIP: { - skip "Can't find a system word list", 2 if $word_file eq ''; + skip "Can't find a system word list", 21 if $word_file eq ''; my $wl = Games::Word::Wordlist->new($word_file, cache => 0); my $result; -- cgit v1.2.3