summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-04-13 11:54:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-04-13 11:54:43 +0000
commit48bc14536b460c09bd2ee1566a9fb83de64910ac (patch)
tree3142afbb7f7e70ca3386f1c13d8f1374d90e15bc /perl-install/my_gtk.pm
parented63b17af86c3d58e819f31b49c82a08828d4c95 (diff)
downloaddrakx-backup-do-not-use-48bc14536b460c09bd2ee1566a9fb83de64910ac.tar
drakx-backup-do-not-use-48bc14536b460c09bd2ee1566a9fb83de64910ac.tar.gz
drakx-backup-do-not-use-48bc14536b460c09bd2ee1566a9fb83de64910ac.tar.bz2
drakx-backup-do-not-use-48bc14536b460c09bd2ee1566a9fb83de64910ac.tar.xz
drakx-backup-do-not-use-48bc14536b460c09bd2ee1566a9fb83de64910ac.zip
(new): make dams happy
Diffstat (limited to 'perl-install/my_gtk.pm')
-rw-r--r--perl-install/my_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index ba05164fd..04dcf0364 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -40,7 +40,7 @@ sub new {
$o->_create_window($title);
while (my $e = shift @tempory::objects) { $e->destroy }
foreach (@interactive::objects) {
- $::isWizard or $::isEmbedded or $_->{rwindow}->set_modal(0);
+ $_->{rwindow}->set_modal(0) if $_->{rwindow}->can('set_modal');
}
push @interactive::objects, $o if !$opts{no_interactive_objects};
$o->{rwindow}->set_position('center_always') if $::isStandalone;