diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-01-11 08:35:04 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-01-11 08:35:04 +0000 |
| commit | a47f9b419de7a7a7c00aa155bf8b749493b431f0 (patch) | |
| tree | 598381e866e7216c4af6e529fa63a9c3d19309ad /perl-install/ugtk2.pm | |
| parent | 93b75d5070f7939f103a9d6f9b95297aebae151b (diff) | |
| download | drakx-a47f9b419de7a7a7c00aa155bf8b749493b431f0.tar drakx-a47f9b419de7a7a7c00aa155bf8b749493b431f0.tar.gz drakx-a47f9b419de7a7a7c00aa155bf8b749493b431f0.tar.bz2 drakx-a47f9b419de7a7a7c00aa155bf8b749493b431f0.tar.xz drakx-a47f9b419de7a7a7c00aa155bf8b749493b431f0.zip | |
no need to set widget name to Title (what was it used for?)
Diffstat (limited to 'perl-install/ugtk2.pm')
| -rw-r--r-- | perl-install/ugtk2.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index cfeef7d9a..ff2aa3d8f 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -330,8 +330,7 @@ sub create_box_with_title { undef $::no_separator; my $new_label = sub { my ($txt) = @_; - my $w = ref($txt) ? $txt : gtknew('WrappedLabel', text => $txt); - gtkset_name($w, "Title"); + ref($txt) ? $txt : gtknew('WrappedLabel', text => $txt); }; if ($o->{icon} && (!$::isWizard || $::isInstall)) { gtkpack__($box, @@ -940,7 +939,6 @@ sub _create_window { my $w = gtknew('Window', if_(!$::isInstall && !$::isWizard, border_width => 5), - widget_name => 'Title', position_policy => !$::isInstall && !$::isStandalone ? 'center-always' : 'center-on-parent', if_(!$::isInstall, icon_no_error => wm_icon()), |