summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/install_any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index b4d96925d..38708ee54 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -372,7 +372,7 @@ If you want to skip some of them, you can unselect them now."),
label => sub { $_[0][3] },
},
);
- log::l("keeping media " . map { $_->[1] } @$l);
+ log::l("keeping media " . join ',', map { $_->[1] } @$l);
@$l;
}
@@ -414,7 +414,7 @@ sub selectSupplMedia {
: int(keys %{$o->{packages}{mediums}}) + 1;
local $::isWizard = 0;
#- configure network if needed
- if (!our $asked && !scalar keys %{$o->{intf}}) {
+ if (!(our $asked) && !scalar keys %{$o->{intf}}) {
$asked = 1;
#- install basesystem now
$::o->do_pkgs->ensure_is_installed('basesystem', undef, 1);