summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authordamien <damien@mandriva.com>2001-04-16 19:59:57 +0000
committerdamien <damien@mandriva.com>2001-04-16 19:59:57 +0000
commitc7fee2b3d5ea231ef6484990162b6c8b0b557dba (patch)
tree314215a2b6d3d33e75a6af49da5940d545d90fc7 /perl-install
parent0f1adcdbcefb7f4bd4c6da303ca9a1e39aa4c329 (diff)
downloaddrakx-c7fee2b3d5ea231ef6484990162b6c8b0b557dba.tar
drakx-c7fee2b3d5ea231ef6484990162b6c8b0b557dba.tar.gz
drakx-c7fee2b3d5ea231ef6484990162b6c8b0b557dba.tar.bz2
drakx-c7fee2b3d5ea231ef6484990162b6c8b0b557dba.tar.xz
drakx-c7fee2b3d5ea231ef6484990162b6c8b0b557dba.zip
updated
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/draknet2
-rwxr-xr-xperl-install/standalone/net_monitor4
2 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet
index 802957f76..09e0b0c21 100755
--- a/perl-install/standalone/draknet
+++ b/perl-install/standalone/draknet
@@ -328,8 +328,8 @@ $window1->show_all();
$_->hide foreach ($button1, $button3);
Gtk->main_iteration while Gtk->events_pending;
$::isEmbedded and kill USR2, $::CCPID;
+my $tag = Gtk->timeout_add(5000, sub { update(); 1 });
Gtk->main;
-my $tag = Gtk->timeout_add(5000, sub { update (); 1 });
Gtk->exit(0);
dd:
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor
index 1da91ebf0..cce794c5f 100755
--- a/perl-install/standalone/net_monitor
+++ b/perl-install/standalone/net_monitor
@@ -38,7 +38,7 @@ my $window1 = $::isEmbedded ? new Gtk::Plug ($::XID) : new Gtk::Window -toplevel
$window1->signal_connect ( delete_event => sub { Gtk->exit(0); });
$window1->set_position(1);
$window1->set_title(_("Network Monitoring"));
-$window1->set_policy(0, 0, 0);
+#$window1->set_policy(0, 0, 0);
$window1->set_border_width(5);
#$::isEmbedded or $window1->set_usize(500, 400);
@@ -82,7 +82,7 @@ $button_connect->add(gtkpack__(new Gtk::VBox(0,3),
));
$statusbar->push(1, _("Not connected"));
$window1->show_all();
-$window1->set_policy (1, 1, 1);
+#$window1->set_policy (1, 1, 1);
update();
my ($labelr, $labelt);
my $time_tag = Gtk->timeout_add(1000, \&rescan);