From 8f40903b27cdafb7bab649a3c314312376191f95 Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Thu, 7 Mar 2002 18:30:22 +0000
Subject: in replay mode, since $o->{interactiveSteps} exists, we can't simply
 ||= @graphical_steps, we need to push to ensure that the @graphical_steps is
 always honoured

---
 perl-install/install_steps_auto_install.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'perl-install/install_steps_auto_install.pm')

diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm
index d81675b31..bb30e6b20 100644
--- a/perl-install/install_steps_auto_install.pm
+++ b/perl-install/install_steps_auto_install.pm
@@ -17,8 +17,7 @@ sub new {
 
     # Handle legacy options
     $o->{interactive} ||= 'gtk' if $graphical || !is_empty_array_ref($o->{interactiveSteps});
-    $o->{interactiveSteps} ||= [ @graphical_steps ];
-    push @{$o->{interactiveSteps}}, qw(installPackages exitInstall);
+    push @{$o->{interactiveSteps}}, qw(installPackages exitInstall), @graphical_steps;
 
     if ($o->{interactive}) {
         my $interactiveClass = "install_steps_$o->{interactive}";
-- 
cgit v1.2.1