diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-06-22 03:05:33 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-06-22 03:05:33 +0000 |
| commit | d21b9b20463bba91485a5b4ec6ed7db141456a24 (patch) | |
| tree | a5282db21f3f3ac640b28e652118eedec1003ff9 /perl-install | |
| parent | 516339890ce0e7782c5e5405775efd6ced860f3e (diff) | |
| download | drakx-d21b9b20463bba91485a5b4ec6ed7db141456a24.tar drakx-d21b9b20463bba91485a5b4ec6ed7db141456a24.tar.gz drakx-d21b9b20463bba91485a5b4ec6ed7db141456a24.tar.bz2 drakx-d21b9b20463bba91485a5b4ec6ed7db141456a24.tar.xz drakx-d21b9b20463bba91485a5b4ec6ed7db141456a24.zip | |
->set_title doesn't like title undef, give it '' instead
(to remove ugly warnings at install)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk2.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 9e8c2a47c..c28720f93 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -953,7 +953,7 @@ sub new { } $::WizardWindow->show; } - $::WizardWindow->set_title($title); + $::WizardWindow->set_title($title || ''); gtkpack($::WizardTable, $o->{window}); } $o->{rwindow}->signal_connect(destroy => sub { $o->{destroyed} = 1 }); @@ -1019,7 +1019,7 @@ sub _create_window { my $w = Gtk2::Window->new('toplevel'); $w->set_name("Title"); - $w->set_title($title); + $w->set_title($title || ''); if ($force_focus) { (my $previous_current_window, $ugtk2::current_window) = ($ugtk2::current_window, $w); |