diff options
author | Olivier Blin <oblin@mandriva.org> | 2004-08-25 05:50:49 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2004-08-25 05:50:49 +0000 |
commit | 8d106ad4c67bbb1ae568aa275a8a0a02015cfba4 (patch) | |
tree | 6ba12e69fe02cbc98e41145b084baad0126aabef | |
parent | b9e6ef4447684d5786c51ea7b447a6b874f67a9b (diff) | |
download | drakx-8d106ad4c67bbb1ae568aa275a8a0a02015cfba4.tar drakx-8d106ad4c67bbb1ae568aa275a8a0a02015cfba4.tar.gz drakx-8d106ad4c67bbb1ae568aa275a8a0a02015cfba4.tar.bz2 drakx-8d106ad4c67bbb1ae568aa275a8a0a02015cfba4.tar.xz drakx-8d106ad4c67bbb1ae568aa275a8a0a02015cfba4.zip |
use exists
-rwxr-xr-x | perl-install/standalone/drakconnect | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 1aa28d9cf..7c46f194d 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -207,7 +207,7 @@ sub manage { } while (my ($device, $interface) = each %$intf) { my $type; - member($device, keys %name) and next; + exists $name{$device} and next; $type = network::tools::get_interface_type($interface) and $p->{$type} = { kind => $device }; } |