diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2003-02-17 14:28:44 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2003-02-17 14:28:44 +0000 |
| commit | eecd31c5835b1521ca0d3de97822ca72083b9a45 (patch) | |
| tree | 3c0b6286e4150f088148d02153438c1956731cbb /perl-install | |
| parent | a5d6fe3636f8080b9603572894ed317aaed6d2c8 (diff) | |
| download | drakx-eecd31c5835b1521ca0d3de97822ca72083b9a45.tar drakx-eecd31c5835b1521ca0d3de97822ca72083b9a45.tar.gz drakx-eecd31c5835b1521ca0d3de97822ca72083b9a45.tar.bz2 drakx-eecd31c5835b1521ca0d3de97822ca72083b9a45.tar.xz drakx-eecd31c5835b1521ca0d3de97822ca72083b9a45.zip | |
ensure $o->{raw_X} is not destroyed when there is no modification done
(since in that case Xconfig::main::configure_everything_or_configure_chooser() returns undef)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index ba0bb5124..5254b74ae 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -1204,7 +1204,8 @@ sub configureX { }; require Xconfig::main; - if ($o->{raw_X} = Xconfig::main::configure_everything_or_configure_chooser($o, $options, !$expert, $o->{keyboard}, $o->{mouse})) { + if (my $raw_X = Xconfig::main::configure_everything_or_configure_chooser($o, $options, !$expert, $o->{keyboard}, $o->{mouse})) { + $o->{raw_X} = $raw_X; install_steps::configureXAfter($o); } } |