+ &Pakfire::getmirrors("$force");
+ &Pakfire::dbgetlist("$force");
+ &Pakfire::getcoredb("$force");
+
+ } elsif ("$ARGV[0]" eq "upgrade") {
+ &Pakfire::upgradecore();
+ my @upgradepaks = &Pakfire::dblist("upgrade", "noweb");
+ my @temp, $pak;
+
+ foreach (@upgradepaks) {
+ @temp = &Pakfire::resolvedeps("$_");
+ foreach (@temp) { push(@upgradepaks,$_) if $_; }
+ }
+
+ if (@upgradepaks) {
+ &Pakfire::message("");
+ &Pakfire::message("PAKFIRE UPGR: We are going to install all packages listed above.");
+ if ($interactive) {
+ &Pakfire::message("PAKFIRE INFO: Is this okay? [y/N]");
+ my $ret = <STDIN>;
+ chomp($ret);
+ &Pakfire::logger("PAKFIRE INFO: Answer: $ret");
+ if ( $ret ne "y" ) {
+ &Pakfire::message("PAKFIRE ERROR: Installation aborted.");
+ exit 1;
+ }
+ }
+ }
+
+ ### Download first
+ foreach $pak (@upgradepaks) {
+ #system("mv $Conf::dbdir/meta/meta-$pak $Conf::dbdir/meta/old-meta-$pak");
+ &Pakfire::getpak("$pak", "");
+ }
+
+ foreach $pak (@upgradepaks) {
+ if (&Pakfire::upgradepak("$pak")) {
+ #system("mv $Conf::dbdir/meta/old-meta-$pak $Conf::dbdir/meta/meta-$pak");
+ }
+ }