diff options
| author | Francois Pons <fpons@mandriva.com> | 2000-11-08 10:22:05 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2000-11-08 10:22:05 +0000 |
| commit | b48f228228b48c7b5f35cfd97a7efe7c7c75b91c (patch) | |
| tree | e3e1b2ac69d967eb6c230a9c762517beeb0400c5 /perl-install/Xconfigurator.pm | |
| parent | f1aad9ad970599c94f335337de0646c3075af5ea (diff) | |
| download | drakx-b48f228228b48c7b5f35cfd97a7efe7c7c75b91c.tar drakx-b48f228228b48c7b5f35cfd97a7efe7c7c75b91c.tar.gz drakx-b48f228228b48c7b5f35cfd97a7efe7c7c75b91c.tar.bz2 drakx-b48f228228b48c7b5f35cfd97a7efe7c7c75b91c.tar.xz drakx-b48f228228b48c7b5f35cfd97a7efe7c7c75b91c.zip | |
make sure class discarding do not destroy result
Diffstat (limited to 'perl-install/Xconfigurator.pm')
| -rw-r--r-- | perl-install/Xconfigurator.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 6469c3369..98ab284ea 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -263,6 +263,8 @@ NOTE THIS IS EXPERIMENTAL SUPPORT AND MAY FREEZE YOUR COMPUTER.", $xf3_ver)) . " #- examine choice of user, beware the list MUST NOT BE REORDERED AS the first item should be the #- proposed one by DrakX. my $tc = $in->ask_from_listf(_("XFree configuration"), formatAlaTeX($msg), sub { translate($_[0]{text}) }, \@choices); + #- in case of class discarding, this can help ... + $tc or $tc = $choices[0]; $tc->{code} and $tc->{code}(); $card->{prog} = "/usr/X11R6/bin/" . ($card->{use_xf4} ? 'XFree86' : $card->{server} =~ /Sun (.*)/x ? |