[Enigma-cvs] enigma/data/levels 02grep_levels.pl,1.7,1.8

[Ralf Westram <address@hidden>]

Update of /cvsroot/enigma/enigma/data/levels
In directory subversions:/tmp/cvs-serv14261/data/levels

Modified Files:
        02grep_levels.pl 
Log Message:
- works with new index format



Index: 02grep_levels.pl
===================================================================
RCS file: /cvsroot/enigma/enigma/data/levels/02grep_levels.pl,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** 02grep_levels.pl    20 Oct 2003 17:10:10 -0000      1.7
--- 02grep_levels.pl    27 Oct 2003 12:02:22 -0000      1.8
***************
*** 48,55 ****
    if (not /^todo.lua/) {
      s/\.lua//ig;
!     $index_regex .= "\\|^$_";
    }
  }
! $index_regex = '\\('.substr($index_regex,2).'\\|^[^|]*test[^|]*\\)[^a-z0-9_]';
  
  open FILE, ">$outname" || die "Can't open '$outname'";
--- 48,55 ----
    if (not /^todo.lua/) {
      s/\.lua//ig;
!     $index_regex .= "\\|file=[ \"\}]*$_";
    }
  }
! $index_regex = '\\('.substr($index_regex,2).'\\|^file=[ \"]*test[^ 
\"\}]*\\)[^a-z0-9_]';
  
  open FILE, ">$outname" || die "Can't open '$outname'";