HTTP::Cookies destructor
Zefram <[email protected]>
| Newsgroups | gmane.comp.lang.perl.modules.lwp |
|---|---|
| Message-ID | <[email protected]> |
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