diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-13 14:25:59 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-13 14:25:59 +0000 |
| commit | b7661719bc1f1ebd078c7e7adb2eb25c83526c27 (patch) | |
| tree | 9cedb533d18ccd4640a30488b731f83c3c438d58 /perl-install/network/network.pm | |
| parent | f47690a41184c9f99a6fbf003b1045c3f4c0220b (diff) | |
| download | drakx-backup-do-not-use-b7661719bc1f1ebd078c7e7adb2eb25c83526c27.tar drakx-backup-do-not-use-b7661719bc1f1ebd078c7e7adb2eb25c83526c27.tar.gz drakx-backup-do-not-use-b7661719bc1f1ebd078c7e7adb2eb25c83526c27.tar.bz2 drakx-backup-do-not-use-b7661719bc1f1ebd078c7e7adb2eb25c83526c27.tar.xz drakx-backup-do-not-use-b7661719bc1f1ebd078c7e7adb2eb25c83526c27.zip | |
add/remove spaces to make perl_checker happy
Diffstat (limited to 'perl-install/network/network.pm')
| -rw-r--r-- | perl-install/network/network.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm index 3c4a75895..79884887a 100644 --- a/perl-install/network/network.pm +++ b/perl-install/network/network.pm @@ -269,7 +269,7 @@ sub configureNetworkIntf { my @wireless_modules = qw(aironet_cs aironet4500_cs hermes airo orinoco_cs orinoco airo_cs netwave_cs ray_cs wavelan_cs wvlan_cs airport); my $flag = 0; foreach (@wireless_modules) { - $module =~ /$_/ and $flag =1; + $module =~ /$_/ and $flag = 1; } if ($flag) { $intf->{wireless_eth} = 1; @@ -305,7 +305,7 @@ notation (for example, 1.2.3.4)."); my @fields = qw(IPADDR NETMASK); $::isStandalone or $in->set_help('configureNetworkIP'); $in->ask_from(N("Configuring network device %s", $intf->{DEVICE}), - (N("Configuring network device %s", $intf->{DEVICE}) . ($module ? N(" (driver %s)", $module) : '') ."\n\n") . + (N("Configuring network device %s", $intf->{DEVICE}) . ($module ? N(" (driver %s)", $module) : '') . "\n\n") . $text, [ { label => N("IP address"), val => \$intf->{IPADDR}, disabled => sub { $pump } }, { label => N("Netmask"), val => \$intf->{NETMASK}, disabled => sub { $pump } }, |