diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-02-22 17:17:41 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-02-22 17:17:41 +0000 |
| commit | 74fb93802dbeddc4c8b9912511eea39a786656e0 (patch) | |
| tree | 3f4455d8001ea92a8f59e92f1ac383d455e178a3 /perl-install | |
| parent | fe7ed41a9fcfd21eb1f900d1aeb84fe141a9e732 (diff) | |
| download | drakx-74fb93802dbeddc4c8b9912511eea39a786656e0.tar drakx-74fb93802dbeddc4c8b9912511eea39a786656e0.tar.gz drakx-74fb93802dbeddc4c8b9912511eea39a786656e0.tar.bz2 drakx-74fb93802dbeddc4c8b9912511eea39a786656e0.tar.xz drakx-74fb93802dbeddc4c8b9912511eea39a786656e0.zip | |
workaround set_active failing
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/Xconfigurator.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index 489b006e5..1c2a3f770 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -829,7 +829,7 @@ sub chooseResolutionsGtk($$;$) { #- the set function is usefull to toggle the CheckButton with the callback being ignored my $ignore; my $no_human; # is the w2_combo->entry changed by a human? - my $set = sub { $ignore = 1; $_[0]->set_active(1); $ignore = 0; }; + my $set = sub { $ignore = 1; $_[0] and $_[0]->set_active(1); $ignore = 0; }; my %monitor; $monitor{$_} = [ gtkcreate_png("monitor-" . $_ . ".png") ] foreach (640, 800, 1024, 1280); |