From 3b444951a1e0efac6d703fb0fe97fc8d826a8ddc Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 15 Nov 2006 16:55:29 +0000 Subject: cleanup this mess --- urpm.pm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'urpm.pm') diff --git a/urpm.pm b/urpm.pm index d5e0bbcd..cc489598 100644 --- a/urpm.pm +++ b/urpm.pm @@ -1126,22 +1126,20 @@ sub _update_media__virtual { my ($urpm, $medium, $with_hdlist_dir) = @_; if ($medium->{with_hdlist} && -e $with_hdlist_dir) { - delete @$medium{qw(start end)}; + delete $medium->{modified}; $urpm->{md5sum_modified} = 1; if ($medium->{synthesis}) { _parse_synthesis($urpm, $medium, $with_hdlist_dir); - delete $medium->{modified}; $medium->{synthesis} = 1; if (!is_valid_medium($medium)) { _parse_hdlist($urpm, $medium, $with_hdlist_dir); - delete @$medium{qw(modified synthesis)}; + delete $medium->{synthesis}; } } else { _parse_hdlist($urpm, $medium, $with_hdlist_dir); - delete @$medium{qw(modified synthesis)}; + delete $medium->{synthesis}; if (!is_valid_medium($medium)) { _parse_synthesis($urpm, $medium, $with_hdlist_dir); - delete $medium->{modified}; $medium->{synthesis} = 1; } } -- cgit v1.2.1