3 # This Koha test module is a stub!
4 # Add more tests here!!!
16 use Test::More tests => 4;
20 foreach my $string ("Leçon","modèles") {
21 my @results=C4::Search::_remove_stopwords($string,"kw");
22 $debug && warn "$string ",Dump(@results);
23 ok($results[0] eq $string,"$string is not modified");
26 foreach my $string ("Les chaussettes de l'archiduchesse") {
27 my @results=C4::Search::_remove_stopwords($string,"kw");
28 $debug && warn "$string ",Dump(@results);
29 ok($results[0] ne $string,"$results[0] from $string");