Sophie

Sophie

distrib > Mandriva > 2010.2 > i586 > by-pkgid > fb03a638b3e68122afc41695e91c2748 > files > 1

perl-WWW-Google-Images-0.6.5-1mdv2010.0.src.rpm

diff -Naur -x '*~' WWW-Google-Images-0.6.5/lib/WWW/Google/Images.pm WWW-Google-Images-0.6.5-fix-mechanize-error-handling/lib/WWW/Google/Images.pm
--- WWW-Google-Images-0.6.5/lib/WWW/Google/Images.pm	2007-12-29 02:09:12.000000000 +0100
+++ WWW-Google-Images-0.6.5-fix-mechanize-error-handling/lib/WWW/Google/Images.pm	2009-09-13 22:06:34.000000000 +0200
@@ -72,7 +72,11 @@
         $arg{$key} = 'http://'.$arg{$key} if $arg{$key} !~ m,^\w+?://,o;
     }
 
-    my $a = WWW::Mechanize->new(onwarn => undef, onerror => undef);
+    my $a = WWW::Mechanize->new(
+        onwarn    => undef,
+        onerror   => undef,
+        autocheck => 0
+    );
     $a->proxy(['http'], $arg{proxy}) if $arg{proxy};
 
     my $self = bless {