}
$state = $pkg->{'state'};
+ if ($state eq "Needs-Build")
+ {
+ print "$name: Already in Needs-Build.\n";
+ return;
+ }
+
if ($state eq "BD-Uninstallable") {
if ($opt_override) {
print "$name: Forcing uninstallability mark to be removed. This is not permanent and might be reset with the next trigger run\n";
sub get_source_info {
my $name = shift;
my $pkg = $dbh->selectrow_hashref('SELECT * FROM ' .
- table_name() . ' WHERE package = ? AND distribution = ?',
+ table_name() . ' WHERE package = ? AND distribution = ?' .
+ 'FOR UPDATE',
undef, $name, $distribution);
return $pkg;
}