--- test.pl 2002/02/11 14:26:22 1.1 +++ test.pl 2002/02/11 14:33:42 1.2 @@ -17,7 +17,7 @@ ### test constructor -my $a = new Lingua::Spelling::Alternative() ; +my $a = new Lingua::Spelling::Alternative( DEBUG => 1 ) ; defined($a) || print 'not '; print "ok 2\n";