Don't install packages already installed as a dependency
authorJamie Cameron <jcameron@webmin.com>
Sat, 10 Oct 2009 05:50:25 +0000 (22:50 -0700)
committerJamie Cameron <jcameron@webmin.com>
Sat, 10 Oct 2009 05:50:25 +0000 (22:50 -0700)
package-updates/update.cgi

index eb0a4bd..ad1be6b 100755 (executable)
@@ -83,9 +83,14 @@ else {
                # Do it
                foreach my $ps (@pkgs) {
                        ($p, $s) = split(/\//, $ps);
+                       next if ($donedep{$p});
                        print &text('update_pkg', "<tt>$p</tt>"),"<br>\n";
                        print "<ul>\n";
-                       push(@got, &package_install($p, $s));
+                       @pgot = &package_install($p, $s);
+                       foreach $g (@pgot) {
+                               $donedep{$g}++;
+                               }
+                       push(@got, @pgot);
                        print "</ul><br>\n";
                        }
                if (@got) {