summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/logdrake
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone/logdrake')
-rwxr-xr-xperl-install/standalone/logdrake3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index bf491f71d..6a188a04d 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -216,13 +216,14 @@ sub parse_file {
$file =~ s/\.gz$//;
my ($pbar, $win_pb);
unless ($::isEmbedded && $isExplain) {
+ local $::main_window = $my_win->{real_window};
gtkadd($win_pb = gtkset_modal(Gtk2::Window->new('toplevel'), 1),
gtkpack(Gtk2::VBox->new(2,0),
Gtk2::Label->new(" " . N("please wait, parsing file: %s", $descr) . " "),
$pbar = Gtk2::ProgressBar->new
)
);
- $win_pb->set_transient_for($my_win->{real_window}) unless $::isEmbedded;
+ $win_pb->set_transient_for($my_win->{real_window});
$win_pb->set_position('center');
$win_pb->realize;
$win_pb->show_all;