redtower
1/13/2011 - 2:53 PM

gistfile1.diff

$ diff -c /usr/local/share/perl/5.10.0/XML/Atom/Client.pm /tmp/Client.pm
*** /usr/local/share/perl/5.10.0/XML/Atom/Client.pm 2009-08-03 15:06:36.000000000 +0900
--- /tmp/Client.pm 2009-04-24 17:34:23.000000000 +0900
***************
*** 228,236 ****
  sub new {
      my($class, $client) = @_;
      my $ua = $class->SUPER::new;
-
- $ua->env_proxy;
-
      $ClientOf{$ua} = $client;
      Scalar::Util::weaken($ClientOf{$ua});
      $ua;
--- 228,233 ----