From 0c3fb55d6d55f4e423e600c2e34b150dc2940a7d Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 30 Aug 2004 02:22:47 +0000 Subject: (choose_gtk) fix crash --- perl-install/Xconfig/resolution_and_depth.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/Xconfig/resolution_and_depth.pm') diff --git a/perl-install/Xconfig/resolution_and_depth.pm b/perl-install/Xconfig/resolution_and_depth.pm index b3c71ff2c..8e6bb6c52 100644 --- a/perl-install/Xconfig/resolution_and_depth.pm +++ b/perl-install/Xconfig/resolution_and_depth.pm @@ -262,6 +262,7 @@ sub choose_gtk { $pixmap_mo->set_from_file($image); $x_res_combo->entry->set_text($chosen_x_res . "x" . $chosen_y_res); }; + $x_res_combo->set_popdown_strings(uniq map { "$_->{X}x$_->{Y}" } sort { $a->{X} <=> $b->{X} } @resolutions); $set_chosen_resolution->($chosen_x_res, $chosen_y_res); my $help_sub = $in->interactive_help_sub_display_id('configureX_resolution'); @@ -294,7 +295,6 @@ sub choose_gtk { $set_chosen_resolution->(max(@{$depth2x_res{$chosen_Depth}})); } }); - $x_res_combo->set_popdown_strings(uniq map { "$_->{X}x$_->{Y}" } sort { $a->{X} <=> $b->{X} } @resolutions); $x_res_combo->entry->signal_connect(changed => sub { $set_chosen_resolution->($1, $2) if $x_res_combo->entry->get_text =~ /(\d+)x(\d+)/; -- cgit v1.2.1