View | Details | Raw Unified | Return to bug 22943
Collapse All | Expand All

(-)a/t/Auth.t (-2 lines)
Lines 22-28 use Test::Warn; Link Here
22
use C4::Auth qw / in_iprange /;
22
use C4::Auth qw / in_iprange /;
23
23
24
$ENV{REMOTE_ADDR} = '192.168.1.30';
24
$ENV{REMOTE_ADDR} = '192.168.1.30';
25
my $ipset1 = "192.168.1.30";
26
25
27
ok(in_iprange("192.168.1.30"), 'simple single ip matching remote ip');
26
ok(in_iprange("192.168.1.30"), 'simple single ip matching remote ip');
28
ok(!in_iprange("192.168.1.31"), 'simple single ip not match remote ip');
27
ok(!in_iprange("192.168.1.31"), 'simple single ip not match remote ip');
29
- 

Return to bug 22943