summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_auto_install.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps_auto_install.pm')
-rw-r--r--perl-install/install_steps_auto_install.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm
index 256f19ed2..3b46e6c02 100644
--- a/perl-install/install_steps_auto_install.pm
+++ b/perl-install/install_steps_auto_install.pm
@@ -98,9 +98,8 @@ sub exitInstall {
my ($o, $alldone) = @_;
return if $o->{autoExitInstall};
- if ($graphical) {
- my $O = bless $o, "install_steps_gtk";
- $O->exitInstall($alldone);
+ if ($o->{interactive}) {
+ (bless $o, "install_steps_$o->{interactive}")->exitInstall($alldone);
} else {
install_steps::exitInstall($o);
print "\a";