[TWiki-Dev] CVS: twiki/lib/TWiki Search.pm,1.39,1.40

[Peter T. <pet...@us...>]

Update of /cvsroot/twiki/twiki/lib/TWiki
In directory usw-pr-cvs1:/tmp/cvs-serv3855/TWiki

Modified Files:
	Search.pm 
Log Message:
Fix for Codev.CantAnchorSearchREToEnd

Index: Search.pm
===================================================================
RCS file: /cvsroot/twiki/twiki/lib/TWiki/Search.pm,v
retrieving revision 1.39
retrieving revision 1.40
diff -C2 -r1.39 -r1.40
*** Search.pm	17 May 2002 07:12:33 -0000	1.39
--- Search.pm	16 Jul 2002 05:00:44 -0000	1.40
***************
*** 216,219 ****
--- 216,224 ----
          $tempVal = $TWiki::egrepCmd;
          @tokens = split( /;/, $theSearchVal );
+         if( $theScope eq "topic" ) {
+             # Fix for Codev.CantAnchorSearchREToEnd
+             @tokens = map { s/\$$/\\\.txt\$/o; $_ } @tokens;
+         }
+ 
      } else {
          $tempVal = $TWiki::fgrepCmd;