summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm10
1 files changed, 0 insertions, 10 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 39cdb3955..d1d22770e 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -114,7 +114,6 @@ sub selectedSize {
}
$size;
}
-sub correctedSelectedSize { correctSize(selectedSize($_[0]) / sqr(1024)) }
sub size2time {
my ($x, $max) = @_;
@@ -161,11 +160,6 @@ sub packageByName {
$best or log::l("unknown package `$name'");
$best;
}
-sub packageById {
- my ($packages, $id) = @_;
- my $pkg = $packages->{depslist}[$id]; #- do not log as id unsupported are still in depslist.
- $pkg->is_arch_compat && $pkg;
-}
sub analyse_kernel_name {
my $kernels = join('|', map { "-$_" }
@@ -326,10 +320,6 @@ sub unselectPackage($$;$) {
}
1;
}
-sub setPackageSelection($$$) {
- my ($packages, $pkg, $value) = @_;
- $value ? selectPackage($packages, $pkg) : unselectPackage($packages, $pkg);
-}
sub unselectAllPackages($) {
my ($packages) = @_;