[Netcomics-cvs] netcomics/lib keenspot,1.41,1.42
Brought to you by:
elliotglaysher,
hochstrb
|
From: Sven H. <ha...@us...> - 2008-11-24 02:51:19
|
Update of /cvsroot/netcomics/netcomics/lib In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv14342 Modified Files: keenspot Log Message: whoops, use correct new backreference (way to many () inside this regexp) Index: keenspot =================================================================== RCS file: /cvsroot/netcomics/netcomics/lib/keenspot,v retrieving revision 1.41 retrieving revision 1.42 diff -u -d -r1.41 -r1.42 --- keenspot 24 Nov 2008 02:38:48 -0000 1.41 +++ keenspot 24 Nov 2008 02:51:12 -0000 1.42 @@ -45,7 +45,7 @@ while (1) { if ($text =~ s/src=".*?(\/(comics|strips|\d+)\/.*?$date:??[a-zA-Z_0-9\-\+]*\.((:?jpg)|(:?gif)|(:?png)|(:?swf)))"//i) { my $file = $1; - my $type = $4; + my $type = $3; push(@relurls,$file) unless grep(/$file/, @relurls); $rec->{'type'} = $type; } else { |