From b0f2e44c1dc6ec26af2178b0ea72660e94c0f8d5 Mon Sep 17 00:00:00 2001
From: onefang
Date: Tue, 31 Dec 2019 15:47:34 +1000
Subject: Check if reference packages are still current.

No idea if this'll work, can't test it easily.
---
 apt-panopticon.lua | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/apt-panopticon.lua b/apt-panopticon.lua
index 0ef3bf5..43eeccf 100755
--- a/apt-panopticon.lua
+++ b/apt-panopticon.lua
@@ -754,6 +754,16 @@ local parsePackages = function(host)
 				os.execute('diff -U 0    Packages/' .. n .. dir .. 'Packages_parsed-sorted ' ..
 							'results/' .. APT.options.referenceSite.value .. '/merged/dists/' .. n .. dir .. 'Packages_parsed-sorted ' ..
 							' | grep -E "^\\+" | grep -Ev "^\\+\\+\\+|^---" >>results/NEW_' .. list.out  .. '_TMP_' .. n .. '.txt')
+				for i, s in pairs(referenceDebs) do
+				    if 0 < Apt.exe('grep "' .. s:sub(8, -1) .. '" results/OLD_' .. list.out  .. '_' .. n .. '.txt'):Do().status then
+					print('Reference package is out of date - ' .. s)
+				    end
+				end
+				for i, s in pairs(referenceDevs) do
+				    if 0 < Apt.exe('grep "' .. s:sub(8, -1) .. '" results/OLD_' .. list.out  .. '_' .. n .. '.txt'):Do().status then
+					print('Reference package is out of date - ' .. s)
+				    end
+				end
 			    else
 				C("Can't find file Packages/" .. n .. dir .. "Packages_parsed-sorted")
 			    end
-- 
cgit v1.1