aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/gurpm.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Rpmdrake/gurpm.pm')
-rwxr-xr-xRpmdrake/gurpm.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/Rpmdrake/gurpm.pm b/Rpmdrake/gurpm.pm
index 220c2eaf..12501e57 100755
--- a/Rpmdrake/gurpm.pm
+++ b/Rpmdrake/gurpm.pm
@@ -34,6 +34,7 @@ our ($mainw, $label, $progressbar, $vbox, $cancel, $hbox_cancel);
sub init {
my ($title, $initializing, %options) = @_;
$mainw = ugtk2->new($title, %options);
+ $::main_window = $mainw->{real_window};
$label = gtknew('Label', text => $initializing);
$progressbar = gtknew('ProgressBar', width => 300);
gtkadd($mainw->{window}, $vbox = gtknew('VBox', spacing => 5, border_width => 6, children_tight => [ $label, $progressbar ]));