diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2007-12-19 16:22:58 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2007-12-19 16:22:58 +0000 |
commit | 5a98bb67538f76f8cc004297a2251147df0eed08 (patch) | |
tree | c612d0fcdd71013d8df1dd1dbaeb4a1eb030a9af /urpm.pm | |
parent | b3ec44efa1b101ed97900f0762bf492b131399f5 (diff) | |
download | urpmi-5a98bb67538f76f8cc004297a2251147df0eed08.tar urpmi-5a98bb67538f76f8cc004297a2251147df0eed08.tar.gz urpmi-5a98bb67538f76f8cc004297a2251147df0eed08.tar.bz2 urpmi-5a98bb67538f76f8cc004297a2251147df0eed08.tar.xz urpmi-5a98bb67538f76f8cc004297a2251147df0eed08.zip |
- urpmi.update, urpmi.addmedia, urpmi.removemedia:
o drop option "-c" which used to clean /var/cache/urpmi/headers
since we don't use that dir anymore :)
Diffstat (limited to 'urpm.pm')
-rw-r--r-- | urpm.pm | 21 |
1 files changed, 0 insertions, 21 deletions
@@ -181,27 +181,6 @@ sub db_open_or_die { $db; } -sub remove_obsolete_headers_in_cache { - my ($urpm) = @_; - my %headers; - if (my $dh = urpm::sys::opendir_safe($urpm, "$urpm->{cachedir}/headers")) { - local $_; - while (defined($_ = readdir $dh)) { - m|^([^/]*-[^-]*-[^-]*\.[^\.]*)(?::\S*)?$| and $headers{$1} = $_; - } - } - if (%headers) { - my $previous_total = scalar(keys %headers); - foreach (@{$urpm->{depslist}}) { - delete $headers{$_->fullname}; - } - $urpm->{log}(N("found %d rpm headers in cache, removing %d obsolete headers", $previous_total, scalar(keys %headers))); - foreach (values %headers) { - unlink "$urpm->{cachedir}/headers/$_"; - } - } -} - #- register local packages for being installed, keep track of source. sub register_rpms { my ($urpm, @files) = @_; |