diff options
| author | Francois Pons <fpons@mandriva.com> | 2002-07-15 12:29:03 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2002-07-15 12:29:03 +0000 |
| commit | cfee01780b4e458fa2a5d677768609936f27ab3d (patch) | |
| tree | e715543a43b74569ecc8360d9b21c1e2ffb57c25 /perl-install/Xconfigurator.pm | |
| parent | de5abfe9a6362061ef57de949cb5572dd0f4cb52 (diff) | |
| download | drakx-cfee01780b4e458fa2a5d677768609936f27ab3d.tar drakx-cfee01780b4e458fa2a5d677768609936f27ab3d.tar.gz drakx-cfee01780b4e458fa2a5d677768609936f27ab3d.tar.bz2 drakx-cfee01780b4e458fa2a5d677768609936f27ab3d.tar.xz drakx-cfee01780b4e458fa2a5d677768609936f27ab3d.zip | |
just updated to use monitor icons all the time (fallback to 1280 monitor aspect).
Diffstat (limited to 'perl-install/Xconfigurator.pm')
| -rw-r--r-- | perl-install/Xconfigurator.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index c5557f88f..efc6bfdec 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -851,8 +851,9 @@ sub chooseResolutionsGtk($$;$) { my %monitor; $monitor{$_} = [ gtkcreate_png("monitor-" . $_ . ".png") ] foreach (640, 800, 1024, 1280); - $monitor{1152} = [ gtkcreate_png("monitor-" . 1024 . ".png") ]; - $monitor{1600} = [ gtkcreate_png("monitor-" . 1280 . ".png") ]; + $monitor{$_} = [ gtkcreate_png("monitor-" . 1024 . ".png") ] foreach (1152); + #- add default icons for resolutions not taken into account (assume largest image available). + $monitor{$_} ||= [ gtkcreate_png("monitor-" . 1280 . ".png") ] foreach map { (split 'x', $_)[0] } @resolutions; my $pixmap_mo = new Gtk::Pixmap( $monitor{$chosen_w}[0] , $monitor{$chosen_w}[1] ); |