From 4ada3ee1607160f8cb0740a704977dcd10fe8588 Mon Sep 17 00:00:00 2001 From: Oliver Gorwits Date: Tue, 30 May 2017 13:07:19 +0100 Subject: [PATCH] fix @_ handling --- lib/App/Netdisco/Util/Device.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/App/Netdisco/Util/Device.pm b/lib/App/Netdisco/Util/Device.pm index ac06c9fc..a45c631f 100644 --- a/lib/App/Netdisco/Util/Device.pm +++ b/lib/App/Netdisco/Util/Device.pm @@ -239,7 +239,7 @@ Returns false if the host is not permitted to arpnip the target device. =cut sub is_arpnipable_now { - my $ip = shift; + my ($ip) = @_; my $device = get_device($ip) or return 0; return _bail_msg("is_arpnipable: cannot arpnip an undiscovered device") @@ -290,7 +290,7 @@ Returns false if the host is not permitted to macsuck the target device. =cut sub is_macsuckable_now { - my $ip = shift; + my ($ip) = @_; my $device = get_device($ip) or return 0; return _bail_msg("is_macsuckable: cannot macsuck an undiscovered device")