IDS: Call helper script when red interface gets up

[ipfire-2.x.git] / src / pakfire / pakfire

diff --git a/src/pakfire/pakfire b/src/pakfire/pakfire
index 8bca061aba696b34807c6cda0e19f928fa668736..041ba669a3b016ae236cc2d6647429f5efc407a5 100644 (file)
--- a/src/pakfire/pakfire
+++ b/src/pakfire/pakfire
@@ -24,13 +24,15 @@
        delete @ENV{qw(IFS CDPATH ENV BASH_ENV PATH)};
        $< = $>;
 
+       # Store keys here
+       $ENV{"GNUPGHOME"} = "/opt/pakfire/etc/.gnupg";
+
        require "/opt/pakfire/lib/functions.pl";
        
        my $interactive = 1;
        my $force = "noforce";
        
        &Pakfire::logger("PAKFIRE INFO: IPFire Pakfire $Conf::version started!");
-       &Pakfire::checkcryptodb;
 
        ### Check if we are running as root
        #
@@ -247,7 +249,6 @@
        
        } elsif ("$ARGV[0]" eq "update") {
                &Pakfire::makeuuid();
-               &Pakfire::senduuid();
                &Pakfire::getmirrors("$force");
                &Pakfire::dbgetlist("$force");
                &Pakfire::getcoredb("$force");
@@ -255,10 +256,11 @@
        } elsif ("$ARGV[0]" eq "upgrade") {
                &Pakfire::upgradecore();
                my @upgradepaks = &Pakfire::dblist("upgrade", "noweb");
+               my @deps = ();
 
                if (@upgradepaks) {
                        # Resolve the dependencies of the to be upgraded packages
-                       my @deps = &Pakfire::resolvedeps_recursive(@upgradepaks);
+                       @deps = &Pakfire::resolvedeps_recursive(@upgradepaks);
 
                        &Pakfire::message("");
                        &Pakfire::message("PAKFIRE UPGR: We are going to install all packages listed above.");