summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/authentication.pm2
-rw-r--r--perl-install/install_steps_gtk.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/authentication.pm b/perl-install/authentication.pm
index 0419163f2..846456954 100644
--- a/perl-install/authentication.pm
+++ b/perl-install/authentication.pm
@@ -258,7 +258,7 @@ sub set {
mkdir_p("$::prefix/home/$domain");
$when_network_is_up->(sub {
- run_program::rooted($::prefix, 'net','ads','join', '-U', $authentication->{winuser} . '%' . $authentication->{winpass});
+ run_program::rooted($::prefix, 'net', 'ads', 'join', '-U', $authentication->{winuser} . '%' . $authentication->{winpass});
});
}
}
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index fad541525..606252218 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -591,7 +591,7 @@ sub installPackages {
my ($method, $medium) = @_;
#- if not using a cdrom medium or an iso image, always abort.
- return unless install_any::method_allows_medium_change($method) && !$::oem;
+ return if !install_any::method_allows_medium_change($method) || $::oem;
my $name = pkgs::mediumDescr($o->{packages}, $medium);
local $| = 1; print "\a";