summaryrefslogtreecommitdiffstats
path: root/perl-install/Xconfig/main.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/Xconfig/main.pm')
-rw-r--r--perl-install/Xconfig/main.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/Xconfig/main.pm b/perl-install/Xconfig/main.pm
index f4729b6c8..d7fd47eaf 100644
--- a/perl-install/Xconfig/main.pm
+++ b/perl-install/Xconfig/main.pm
@@ -59,9 +59,9 @@ sub configure_everything {
if (!$ok) {
($ok) = configure_chooser_raw($in, $raw_X, $do_pkgs, $options, $X, 1);
- } else {
- Xconfig::various::various($in, $X->{card}, $options, $auto);
}
+ $X->{various} ||= Xconfig::various::various($in, $X->{card}, $options, $auto);
+
$ok = may_write($in, $raw_X, $X, $ok);
$ok && 'config_changed';
@@ -117,6 +117,7 @@ sub configure_chooser_raw {
),
{ val => _("Options"), icon => "ic82-tape-40", clicked => sub {
Xconfig::various::various($in, $X->{card}, $options);
+ $X->{various} = 'done';
} },
{ val => $::isInstall ? _("Ok") : _("Quit"), icon => "exit", clicked_may_quit => sub { 1 } },
]);