summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-08-19 18:54:23 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-08-19 18:54:23 +0000
commitff671a1dd5354e268e48ec231e44239a8a34885a (patch)
tree24fb7ee810c24d1c074cff85a0e98c5934e9157f /perl-install
parentd1b88be5cb26c4626d8b04269f8343f1027383ff (diff)
downloaddrakx-ff671a1dd5354e268e48ec231e44239a8a34885a.tar
drakx-ff671a1dd5354e268e48ec231e44239a8a34885a.tar.gz
drakx-ff671a1dd5354e268e48ec231e44239a8a34885a.tar.bz2
drakx-ff671a1dd5354e268e48ec231e44239a8a34885a.tar.xz
drakx-ff671a1dd5354e268e48ec231e44239a8a34885a.zip
"xxx or xxx" in list context is always bad!
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/drakpxe4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakpxe b/perl-install/standalone/drakpxe
index 7fbc84657..a1d1f7027 100755
--- a/perl-install/standalone/drakpxe
+++ b/perl-install/standalone/drakpxe
@@ -140,11 +140,11 @@ if (@intf < 1) {
quit_global($in, 0);
} elsif (@intf > 1) {
#- there are more than one interface, we need to choose one of them.
- @intf = ($in->ask_from_listf(N("Choose the network interface"),
+ @intf = $in->ask_from_listf(N("Choose the network interface"),
N("Please choose which network interface will be used for the dhcp server."),
sub { N("Interface %s (on network %s)", $_[0]{DEVICE}, $_[0]{NETWORK}) },
\@intf,
- ) or goto begin);
+ ) or goto begin;
}