return 0;
}
+# TODO: do_install_package etc. should deal with source packages rather
+# than binary packages
sub do_install_package($$) {
my $feed = shift;
my $pkg = shift;
- my $path = $pkg->{makefile};
+
+ my $path;
+ $pkg->{src} and $path = $pkg->{src}{makefile};
if($path) {
$path =~ s/\/Makefile$//;
warn "WARNING: Package '$name' is not available in feed $feed->[1].\n";
return 0;
};
- my $src = $pkg->{src};
+ my $src = $pkg->{src}{name};
my $type = $feed->[0];
$src or $src = $name;
warn "WARNING: $name not installed\n";
next;
};
- $pkg->{src} and $name = $pkg->{src};
+ $pkg->{src} and $name = $pkg->{src}{name};
warn "Uninstalling package '$name'\n";
system("rm -f ./package/feeds/*/$name");
$uninstall = 1;