CVS: mharc/bin web-archive,1.32,1.33

Update of /cvsroot/mhonarc/mharc/bin
In directory subversions:/tmp/cvs-serv21683/bin

Modified Files:
	web-archive 
Log Message:
Fixed translate of space to \s+ in mha_rcvar_expand().  \Q operation
escapes whitspace characters.


Index: web-archive
===================================================================
RCS file: /cvsroot/mhonarc/mharc/bin/web-archive,v
retrieving revision 1.32
retrieving revision 1.33
diff -C2 -r1.32 -r1.33
*** web-archive	8 Sep 2002 04:39:35 -0000	1.32
--- web-archive	9 Sep 2002 03:13:34 -0000	1.33
***************
*** 784,788 ****
      }
      $val = "\Q$val\E";
!     $val =~ s/\s+/\s+/g;
      my $repl_re = $mhonarc::SubReplyRxp;
      my $query = "+subject:/^(?:$repl_re)*$val";
--- 784,788 ----
      }
      $val = "\Q$val\E";
!     $val =~ s/(?:\\\s)+/\\s+/g;	# \Q will escape whitespace
      my $repl_re = $mhonarc::SubReplyRxp;
      my $query = "+subject:/^(?:$repl_re)*$val";

---------------------------------------------------------------------
To sign-off this list, send email to majordomo(_at_)mhonarc(_dot_)org with the
message text UNSUBSCRIBE MHONARC-DEV