[TWiki-Dev] [SVN] CrawfordCurrie r12983 - twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS

[<de...@de...>]

Author: CrawfordCurrie
Date: 2007-02-27 05:07:35 -0600 (Tue, 27 Feb 2007)
New Revision: 12983

Modified:
   twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/EgrepCmd.pm
   twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/FgrepCmd.pm
   twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/SearchAlgorithm.pm
Log:
Item3443: updated checkers for changes for pluggable search algorithms

Modified: twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/EgrepCmd.pm
===================================================================
--- twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/EgrepCmd.pm	2007-02-27 10:30:34 UTC (rev 12982)
+++ twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/EgrepCmd.pm	2007-02-27 11:07:35 UTC (rev 12983)
@@ -27,7 +27,7 @@
 
     return $this->NOTE('Not used for {RCS}{SearchAlgorithm} '.
                          $TWiki::cfg{RCS}{SearchAlgorithm}) unless
-      $TWiki::cfg{RCS}{SearchAlgorithm} eq 'Forking';
+      $TWiki::cfg{RCS}{SearchAlgorithm} =~ /Forking$/;
     return $this->checkGnuProgram($TWiki::cfg{RCS}{EgrepCmd});
 }
 

Modified: twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/FgrepCmd.pm
===================================================================
--- twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/FgrepCmd.pm	2007-02-27 10:30:34 UTC (rev 12982)
+++ twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/FgrepCmd.pm	2007-02-27 11:07:35 UTC (rev 12983)
@@ -27,7 +27,7 @@
 
     return $this->NOTE('Not used for {RCS}{SearchAlgorithm} '.
                          $TWiki::cfg{RCS}{SearchAlgorithm}) unless
-      $TWiki::cfg{RCS}{SearchAlgorithm} eq 'Forking';
+      $TWiki::cfg{RCS}{SearchAlgorithm} =~ /Forking$/;
     return $this->checkGnuProgram($TWiki::cfg{RCS}{FgrepCmd});
 }
 

Modified: twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/SearchAlgorithm.pm
===================================================================
--- twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/SearchAlgorithm.pm	2007-02-27 10:30:34 UTC (rev 12982)
+++ twiki/branches/MAIN/lib/TWiki/Configure/Checkers/RCS/SearchAlgorithm.pm	2007-02-27 11:07:35 UTC (rev 12983)
@@ -25,7 +25,7 @@
     my $this = shift;
 
     my $mess = '';
-    if( $TWiki::cfg{RCS}{SearchAlgorithm} eq 'Native') {
+    if( $TWiki::cfg{RCS}{SearchAlgorithm} =~ /Native$/) {
         eval 'use NativeTWikiSearch';
         if ($@) {
             $mess .= $this->ERROR(<<EOF);