CVS: mharc/bin web-archive,1.42,1.43

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

Modified Files:
	web-archive 
Log Message:
Fixed syntax error.


Index: web-archive
===================================================================
RCS file: /cvsroot/mhonarc/mharc/bin/web-archive,v
retrieving revision 1.42
retrieving revision 1.43
diff -C2 -r1.42 -r1.43
*** web-archive	16 Jul 2003 00:49:57 -0000	1.42
--- web-archive	16 Jul 2003 22:37:59 -0000	1.43
***************
*** 601,605 ****
    my($file, $tag);
    my $curbase = join('/', $root_dir, $basename);
!   foreach $tag (split(/[\-_]/, @lang) {
      $curbase .= '_' . $tag;
      $file = join('.', $curbase, '.mrc');
--- 601,605 ----
    my($file, $tag);
    my $curbase = join('/', $root_dir, $basename);
!   foreach $tag (split(/[\-_]/, @lang)) {
      $curbase .= '_' . $tag;
      $file = join('.', $curbase, '.mrc');

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