diff --git a/src/script/hydra_update_gc_roots.pl b/src/script/hydra_update_gc_roots.pl
index 394d0b26..509ca65a 100755
--- a/src/script/hydra_update_gc_roots.pl
+++ b/src/script/hydra_update_gc_roots.pl
@@ -34,11 +34,11 @@ sub keepBuild {
 
 # Go over all projects.
 
-foreach my $project ($db->resultset('Projects')->all) {
+foreach my $project ($db->resultset('Projects')->search({hidden => 0},{})) {
 
     # Go over all jobs in this project.
 
-    foreach my $job ($project->jobs->all) {
+    foreach my $job ($project->jobs->search({hidden => 0}, { join => "jobset"})) {
         print STDERR "*** looking for builds to keep in job ",
             $project->name, ":", $job->jobset->name, ":", $job->name, "\n";