From a0a23a5f52756fc33890cd5c0ea9cf43d187002b Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 6 Feb 2008 14:11:08 +0000 Subject: (extract_header) make sure we destroy the download progress dialog on error --- Rpmdrake/pkg.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'Rpmdrake/pkg.pm') diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 47dc55cf..87553e65 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -115,6 +115,7 @@ sub extract_header { } else { my $gurpm; $bar_id = statusbar_msg(N("Getting '%s' from XML meta-data...", $xml_info), 0); + my $_gurpm_clean_guard = before_leaving { undef $gurpm }; if (my $xml_info_file = urpm::media::any_xml_info($urpm, $medium, $xml_info, undef, sub { $urpm ||= Rpmdrake::gurpm->new(N("Please wait"), transient => $::main_window); download_callback($gurpm, @_) -- cgit v1.2.1