From: Galen Charlton <gmcharlt@gmail.com>
Date: Wed, 6 Oct 2010 13:51:55 +0000 (-0400)
Subject: fix test plan and false test errors in Search.t
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=58e2f6a99150d67c92841f8391adec353d65a814;p=koha.git

fix test plan and false test errors in Search.t

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
---

diff --git a/t/db_dependent/Search.t b/t/db_dependent/Search.t
index 00d5b7c84d..31316f2170 100644
--- a/t/db_dependent/Search.t
+++ b/t/db_dependent/Search.t
@@ -5,24 +5,26 @@
 
 use strict;
 use warnings;
+use utf8;
+
 use YAML;
 
 use C4::Debug;
 use C4::Context;
 use C4::Search;
 
-use Test::More tests => 3;
+use Test::More tests => 4;
 
-BEGIN {
-    use_ok('C4::Search');
-}
-foreach my $string ("Leçon","mod\xc3\xa8les"){
-my @results=C4::Search::_remove_stopwords($string,"kw");
-$debug && warn "$string ",Dump(@results);
-ok($results[0] eq $string,"$string is not modified");
+use_ok('C4::Search');
+
+foreach my $string ("Leçon","modèles") {
+    my @results=C4::Search::_remove_stopwords($string,"kw");
+    $debug && warn "$string ",Dump(@results);
+    ok($results[0] eq $string,"$string is not modified");
 }
-foreach my $string ("Les chaussettes de l'archiduchesse"){
-my @results=C4::Search::_remove_stopwords($string,"kw");
-$debug && warn "$string ",Dump(@results);
-ok($results[0] ne $string,"$results[0] from $string");
+
+foreach my $string ("Les chaussettes de l'archiduchesse") {
+    my @results=C4::Search::_remove_stopwords($string,"kw");
+    $debug && warn "$string ",Dump(@results);
+    ok($results[0] ne $string,"$results[0] from $string");
 }