diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 1999-09-15 17:31:22 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 1999-09-15 17:31:22 +0000 |
| commit | 71412b3a34bbb1b5056ace130334917bfa6076be (patch) | |
| tree | 5af9cdef0ea08f9bb81e1026fc1e27be7990bfb3 /perl-install/Xconfigurator.pm | |
| parent | fec9449e69b0705b7ef85d9617d36e56f66628a4 (diff) | |
| download | drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar.gz drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar.bz2 drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.tar.xz drakx-backup-do-not-use-71412b3a34bbb1b5056ace130334917bfa6076be.zip | |
no_comment
Diffstat (limited to 'perl-install/Xconfigurator.pm')
| -rw-r--r-- | perl-install/Xconfigurator.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 9eec42f88..acd1c17f0 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -252,7 +252,7 @@ sub testFinalConfig($;$) { symlink "$prefix/tmp/.X11-unix/X9", "/tmp/.X11-unix/X9" if $prefix; local *F; - open F, "|perl" or die; + open F, "|perl" or die ''; print F "use lib qw(", join(' ', @INC), ");\n"; print F q{ use interactive_gtk; @@ -426,7 +426,7 @@ sub resolutionsConfiguration($$) { #-$unknown and $manual ||= !$in->ask_okcancel('', [ _("I can try to autodetect information about graphic card, but it may freeze :("), #- _("Do you want to try?") ]); - unless ($card->{depth}) { + if (is_empty_hash_ref($card->{depth})) { $card->{depth}{$_} = [ map { [ split "x" ] } @resolutions ] foreach @depths; @@ -435,6 +435,9 @@ _("I can try to find the available resolutions (eg: 800x600). Alas it can freeze sometimes Do you want to try?")))) { autoResolutions($o, $nowarning); + is_empty_hash_ref($card->{depth}) and $in->ask_warn('', +_("No valid modes found +Try with another video card or monitor")), return; } } @@ -449,7 +452,7 @@ Do you want to try?")))) { keepOnlyLegalModes($card); my $res = $o->{resolution_wanted} || $resolution_wanted; - my $depth = $card->{default_depth} || autoDefaultDepth($card, $res); + my $depth = eval { $card->{default_depth} || autoDefaultDepth($card, $res) }; $auto or ($depth, $res) = chooseResolutions($card, $depth) or return; |