--- trunk/spider/swishspider 2002/06/04 06:39:53 1 +++ trunk/spider/swishspider 2003/03/16 21:31:55 15 @@ -78,7 +78,7 @@ sub linkcb { my($tag, %links) = @_; - if (($tag eq "a") && ($links{"href"})) { + if (($tag eq "a" || $tag eq "area") && ($links{"href"})) { my $link = $links{"href"}; # @@ -98,6 +98,9 @@ # hack for Apache directory listings $link =~ s,/\?[NMSD]=[AD]$,/,g; + # speedup, skip pictures + return if ($link =~ m/\.(gif|jpg|png)/); + if ($no_parent_url) { if ($link =~ m/$no_parent_url/) { print LINKS "$link $no_parent_url\n";