Yes, similar to clean and autoclean, there should be a function to remove all
archives except of currently installed packages.

Here is what I cobbled together to do it by hand.

$ cat Makefile
S=/var/lib/dpkg/status
death:/tmp/deathlist;set -e; cd /var/cache/apt/archives; df .;xargs rm < $?; df 
.
/tmp/installed:$S;apt-show-versions|sed 's!/.*!!' > $@
/tmp/archives:;ls /var/cache/apt/archives|perl -pwle 's/_.*/ $$_/' |sort > $@
/tmp/deathlist:/tmp/archives /tmp/installed
        join -v 1 $?|perl -anwle 'for($$F[1]){print if defined}' > $@

Of course I ran it just after an autoclean with APT::Clean-Installed
true... to make the join have no double matches...



-- 
To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Reply via email to