Add Redirects tests fully.

1 files changed, 2 insertions, 2 deletions

diff --git a/apt-panopticon.lua b/apt-panopticon.lua
index 43eeccf..2237232 100755
--- a/apt-panopticon.lua
+++ b/apt-panopticon.lua
@@ -345,7 +345,7 @@ checkHEAD = function (host, URL, r, retry, sanity)
         if nil ~= location then
             pu = url.parse(location, defaultURL)
             if (pu.host == APT.options.roundRobin.value) and (nil ~= PU.path:find('merged/pool/DEVUAN/')) then
-                E('DEVUAN packages must not be redirected to ' .. APT.options.roundRobin.value .. ' - ' .. APT.lnk(URL) .. arw .. APT.lnk(location), PU.scheme, sanity, host)
+                E('DEVUAN packages must not be redirected to ' .. APT.options.roundRobin.value .. ' - ' .. APT.lnk(URL) .. arw .. APT.lnk(location), PU.scheme, 'Redirects', host)
             end
             if ('http' == location:sub(1, 4)) and (pu.scheme ~= PU.scheme) then -- Sometimes a location sans scheme is returned, this is not a protocol change.
                 if APT.testing("Protocol") then
@@ -393,7 +393,7 @@ checkHEAD = function (host, URL, r, retry, sanity)
                 end
             end
         elseif nil ~= PU.path:find('merged/pool/DEBIAN-SECURITY/') then
-            W('DEBIAN-SECURITY packages must be redirected to a Debian mirror - ' .. APT.lnk(URL) .. arw .. APT.lnk(location), PU.scheme, sanity, host)
+            W('DEBIAN-SECURITY packages must be redirected to a Debian mirror - ' .. APT.lnk(URL) .. arw .. APT.lnk(location), PU.scheme, 'Redirects', host)
         end
     end
 end