From 7f0d56e47d3c6d230fe1a96aaa8066567bbfb4d8 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 23 Jan 2003 10:09:26 +0000
Subject: - force use strict - perl_checker fix

---
 perl-install/network/ethernet.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/network')

diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm
index ca468125d..b0b15ff42 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -1,5 +1,6 @@
 package network::ethernet;
 
+use strict;
 use network::network;
 use modules;
 use modules::interactive;
@@ -186,7 +187,6 @@ sub configureNetwork {
     if ($last->{BOOTPROTO} =~ /dhcp|bootp|zeroconf/) {
 	$netc->{minus_one} = 1;
 	$netc->{DHCP} = 1;
-	my $dhcp_hostname = $netc->{HOSTNAME};
 	$::isInstall and $in->set_help('configureNetworkHostDHCP');
 	$in->ask_from(N("Configuring network"),
 N("Please enter your host name if you know it.
-- 
cgit v1.2.1