summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-02-24 07:37:48 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-02-24 07:37:48 +0000
commit4dd9866ad98490d1423b19a475c36cde402f3785 (patch)
tree492a535c567b1660ce2206fcfda192d453b8b99f /perl-install/standalone
parent04a32a7f6b48a977c768d62a1c28f00958e0c9df (diff)
downloaddrakx-4dd9866ad98490d1423b19a475c36cde402f3785.tar
drakx-4dd9866ad98490d1423b19a475c36cde402f3785.tar.gz
drakx-4dd9866ad98490d1423b19a475c36cde402f3785.tar.bz2
drakx-4dd9866ad98490d1423b19a475c36cde402f3785.tar.xz
drakx-4dd9866ad98490d1423b19a475c36cde402f3785.zip
first attempt at making printerdrake to behave smoother when embedded in the
mcc
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/harddrake211
1 files changed, 4 insertions, 7 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index 8ed52485a..c6041c284 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -118,14 +118,11 @@ my @menu_items =
}
}
);
-my ($sig_id, $wait);
+
$in = 'interactive'->vnew('su', 'default');
-{
- local $::isEmbedded = 0; # to prevent sub window embedding
- $wait = $in->wait_message(N("Please wait"), N("Detection in progress"));
- gtkflush();
-}
+my $wait = $in->wait_message(N("Please wait"), N("Detection in progress"));
+gtkflush();
%options = getVarsFromSh($conffile);
@@ -141,7 +138,7 @@ unless ($::isEmbedded) {
($menubar, $factory) = create_factory_menu($w->{rwindow}, @menu_items);
}
my $tree_model = Gtk2::TreeStore->new(Gtk2::GType->OBJECT, Gtk2::GType->STRING);
-my $statusbar;
+my ($statusbar, $sig_id);
$w->{window}->add(gtkpack_(0, Gtk2::VBox->new(0, 0),
if_(!$::isEmbedded, 0, $menubar),
1, create_hpaned(gtkadd(new Gtk2::Frame(N("Detected hardware")),