1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 5b616bd2c..7136726e9 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -154,7 +154,12 @@ sub setPackages {
     my $w = $o->wait_message('', _("Searching for available packages"));
     $o->SUPER::setPackages($install_classes);
 }
-
+#------------------------------------------------------------------------------
+sub findPackagesToUpgrade {
+    my ($o) = @_;
+    my $w = $o->wait_message('', _("Finding package to upgrade"));
+    $o->SUPER::findPackagesToUpgrade();
+}
 #------------------------------------------------------------------------------
 sub configureNetwork($) {
     my ($o, $first_time) = @_;