summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2004-07-05 07:55:36 +0000
committerOlivier Blin <oblin@mandriva.org>2004-07-05 07:55:36 +0000
commit0e270041857abf23420000c8eac6089db2c62bfa (patch)
treeede5339ac13a489a5367e763995ebb325e81548a /perl-install
parent9661b71b22ea7b41b2383b0b620caf48f09c161f (diff)
downloaddrakx-0e270041857abf23420000c8eac6089db2c62bfa.tar
drakx-0e270041857abf23420000c8eac6089db2c62bfa.tar.gz
drakx-0e270041857abf23420000c8eac6089db2c62bfa.tar.bz2
drakx-0e270041857abf23420000c8eac6089db2c62bfa.tar.xz
drakx-0e270041857abf23420000c8eac6089db2c62bfa.zip
remove unused variable $type
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/net_monitor3
1 files changed, 0 insertions, 3 deletions
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor
index c31d1006a..c8a2a3b21 100755
--- a/perl-install/standalone/net_monitor
+++ b/perl-install/standalone/net_monitor
@@ -407,9 +407,6 @@ sub update() {
my $y = $e->y;
my $received = $x >= 0 ? $monitor->{$intf}{stack_r}[$x] : 0;
my $transmitted = $x >= 0 ? $monitor->{$intf}{stack_t}[$x] : 0;
- my $type;
- $y * $echt / $height < $transmitted and $type = N("transmitted");
- ($height - $y) * $echr / $height < $received and $type = N("received");
$measure_r->set_label(formatXiB($received));
$measure_t->set_label(formatXiB($transmitted));
});