Changeset 816 for trunk/UnitTestContrib/test/unit/Fn_SEARCH.pm

Timestamp:

11/19/08 19:11:33 (4 years ago)

Author:

CrawfordCurrie

Message:

Item175: ported unit tests to new namespace. They all pass.

File:

• trunk/UnitTestContrib/test/unit/Fn_SEARCH.pm (modified) (6 diffs)

trunk/UnitTestContrib/test/unit/Fn_SEARCH.pm

@@ -6 +6 @@
 package Fn_SEARCH;
 
-use base qw( TWikiFnTestCase );
-
-use TWiki;
+use base qw( FoswikiFnTestCase );
+
+use Foswiki;
 use Error qw( :try );
 
@@ -36 +36 @@
     my (%salgs, %qalgs);
     foreach my $dir (@INC) {
-        if (opendir(D, "$dir/TWiki/Store/SearchAlgorithms")) {
+        if (opendir(D, "$dir/Foswiki/Store/SearchAlgorithms")) {
             foreach my $alg (readdir D) {
                 next unless $alg =~ /^(.*)\.pm$/;
@@ -44 +44 @@
             closedir(D);
         }
-        if (opendir(D, "$dir/TWiki/Store/QueryAlgorithms")) {
+        if (opendir(D, "$dir/Foswiki/Store/QueryAlgorithms")) {
             foreach my $alg (readdir D) {
                 next unless $alg =~ /^(.*)\.pm$/;
@@ -60 +60 @@
         eval <<SUB;
 sub $fn {
-require TWiki::Store::SearchAlgorithms::$alg;
-\$TWiki::cfg{RCS}{SearchAlgorithm} = 'TWiki::Store::SearchAlgorithms::$alg'; }
+require Foswiki::Store::SearchAlgorithms::$alg;
+\$Foswiki::cfg{RCS}{SearchAlgorithm} = 'Foswiki::Store::SearchAlgorithms::$alg'; }
 SUB
         die $@ if $@;
@@ -71 +71 @@
         eval <<SUB;
 sub $fn {
-require TWiki::Store::QueryAlgorithms::$alg;
-\$TWiki::cfg{RCS}{QueryAlgorithm} = 'TWiki::Store::QueryAlgorithms::$alg'; }
+require Foswiki::Store::QueryAlgorithms::$alg;
+\$Foswiki::cfg{RCS}{QueryAlgorithm} = 'Foswiki::Store::QueryAlgorithms::$alg'; }
 SUB
         die $@ if $@;
@@ -611 +611 @@
     $query->path_info("/$this->{test_web}/$this->{test_topic}");
 
-    $this->{twiki} = new TWiki(undef, $query);
+    $this->{twiki} = new Foswiki(undef, $query);
     $this->assert_str_equals($this->{test_web}, $this->{twiki}->{webName});
-    $TWiki::Plugins::SESSION = $this->{twiki};
+    $Foswiki::Plugins::SESSION = $this->{twiki};
 }