HTTP::Cookies destructor

HTTP::Cookies destructor

am 08.09.2007 10:31:52 von zefram

The destructor for HTTP::Cookies can clobber $! and the other global
status variables. Destructors need to avoid this because they are
called implicitly. This patch fixes it:

START_OF_PATCH
--- libwww-perl-5.808.orig/lib/HTTP/Cookies.pm 2004-11-12 10:06:12.000000000 +0000
+++ libwww-perl-5.808.mod0/lib/HTTP/Cookies.pm 2007-09-08 09:28:13.922627811 +0100
@@ -507,6 +507,7 @@
sub DESTROY
{
my $self = shift;
+ local($., $@, $!, $^E, $?);
$self->save if $self->{'autosave'};
}

END_OF_PATCH

-zefram