[dak/master 1/2] Don't remove sources which are referenced by other binaries

[Mark Hymers <mhy@debian.org>]

Signed-off-by: Mark Hymers <mhy@debian.org>
---
 dak/clean_suites.py |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/dak/clean_suites.py b/dak/clean_suites.py
index c6a0a77..ab1e76d 100755
--- a/dak/clean_suites.py
+++ b/dak/clean_suites.py
@@ -254,7 +254,8 @@ def clean(now_date, delete_date, max_delete, session):
     q = session.execute("""
 SELECT s.id, f.filename FROM source s, files f
   WHERE f.last_used <= :deletedate
-        AND s.file = f.id""", {'deletedate': delete_date})
+        AND s.file = f.id
+        AND s.id NOT IN (SELECT src_id FROM extra_src_references)""", {'deletedate': delete_date})
     for s in q.fetchall():
         Logger.log(["delete source", s[1], s[0]])
         if not Options["No-Action"]:
-- 
1.7.2.5