From 582f47a784e872fb3e076203650e683ee9ee1cd6 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Thu, 21 Oct 2004 07:19:28 +0000 Subject: Remove a spurious level of gtkpack__ --- rpmdrake.pm | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/rpmdrake.pm b/rpmdrake.pm index da638012..9386f60d 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -247,13 +247,21 @@ sub wait_msg { my $mainw = ugtk2->new('rpmdrake', grab => 1, if_(exists $options{transient}, transient => $options{transient})); $mainw->{rwindow}->set_position($options{transient} ? 'center_on_parent' : 'center_always') if !$::isEmbedded; my $label = ref($msg) =~ /^Gtk/ ? $msg : Gtk2::WrappedLabel->new($msg); - gtkadd($mainw->{window}, gtkpack__(gtkpack__(gtkset_border_width(Gtk2::VBox->new(0, 5),6), $label, if_(exists $options{widgets}, @{$options{widgets}})))); + gtkadd( + $mainw->{window}, + gtkpack__( + gtkset_border_width(Gtk2::VBox->new(0, 5), 6), + $label, + if_(exists $options{widgets}, @{$options{widgets}}), + ) + ); $label->signal_connect(expose_event => sub { $mainw->{displayed} = 1; 0 }); $mainw->sync until $mainw->{displayed}; gtkset_mousecursor_wait($mainw->{rwindow}->window); $mainw->flush; $mainw; } + sub remove_wait_msg { my $w = shift; gtkset_mousecursor_normal($w->{rwindow}->window); -- cgit v1.2.1