1
0
mirror of https://github.com/fspc/dswim.git synced 2025-04-04 08:13:24 -04:00

This is being used now, but just a small change.

This commit is contained in:
freesource 2005-01-05 22:06:36 +00:00
parent 4b81938fbe
commit 84971c3dbb

View File

@ -591,6 +591,7 @@ sub initndb {
exit if $#ARGV == -1; exit if $#ARGV == -1;
################################ ################################
# APT || DF CONTENTS SITUATION # # APT || DF CONTENTS SITUATION #
################################ ################################
@ -1313,6 +1314,12 @@ sub not_installed {
# it happens to have more than one version, this means running # it happens to have more than one version, this means running
# a check, but if the package exists in another architecture, then # a check, but if the package exists in another architecture, then
# it isn't a repeat. # it isn't a repeat.
# 2003 This is my customized approach using "apt-cache dumpavail" rather
# then lists/packages
$argument = "apt-cache dumpavail|";
my (%Package_count,%not_me,$packler,%not_me2,%warch,%arc); my (%Package_count,%not_me,$packler,%not_me2,%warch,%arc);
open(PACKAGE, "$argument"); open(PACKAGE, "$argument");
while (<PACKAGE>) { while (<PACKAGE>) {