diff options
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 2 | ||||
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index de0ae5b4e..a24b8d997 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 method_allows_medium_change($method) && !$::oem; + return unless install_any::method_allows_medium_change($method) && !$::oem; my $name = pkgs::mediumDescr($o->{packages}, $medium); local $| = 1; print "\a"; diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index a09321277..28ecc1787 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -684,7 +684,7 @@ sub installPackages { my ($method, $medium) = @_; #- if not using a cdrom medium or an iso image, always abort. - return unless method_allows_medium_change($method) && !$::oem; + return unless install_any::method_allows_medium_change($method) && !$::oem; my $name = pkgs::mediumDescr($o->{packages}, $medium); local $| = 1; print "\a"; |