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

(-)a/opac/ilsdi.pl (-1 / +13 lines)
Lines 178-183 if (@AuthorizedIPs) { # If no filter set, allow access to everybody Link Here
178
        $out->{'code'}    = "NotAllowed";
178
        $out->{'code'}    = "NotAllowed";
179
        $out->{'message'} = "Unauthorized IP address: $ENV{REMOTE_ADDR}.";
179
        $out->{'message'} = "Unauthorized IP address: $ENV{REMOTE_ADDR}.";
180
    }
180
    }
181
} else {
182
    $out->{'code'}    = "NotAllowed";
183
    $out->{'message'} = "Unauthorized IP address: $ENV{REMOTE_ADDR}.";
184
185
    print XMLout(
186
        $out,
187
        noattr        => 1,
188
        nosort        => 1,
189
        xmldecl       => '<?xml version="1.0" encoding="UTF-8" ?>',
190
        RootName      => "ilsdi",
191
        SuppressEmpty => 1
192
    );
193
    exit 0;
181
}
194
}
182
195
183
my $service = $cgi->param('service') || "ilsdi";
196
my $service = $cgi->param('service') || "ilsdi";
184
- 

Return to bug 36867