X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bin%2Fwanna-build;h=288d3f7722139f93fce1802f0e7c4ce69a74bcbf;hb=8ec9cd8daed883c54f1eb604ddd65ce828982a40;hp=560a3d98307b1d421e2df33e016de2da9f6a9294;hpb=7d67dfb772254f771ef9cb80f98e516cef6e27ef;p=wannabuild.git diff --git a/bin/wanna-build b/bin/wanna-build index 560a3d9..288d3f7 100755 --- a/bin/wanna-build +++ b/bin/wanna-build @@ -275,7 +275,7 @@ if (!isin ( $op_mode, qw(list) ) && ( ($distribution//"") =~ /[ ,]/)) { if ($verbose) { my $version = '$Revision: db181a534e9d $ $Date: 2008/03/26 06:20:22 $ $Author: rmurray $'; $version =~ s/(^\$| \$ .*$)//g; - print "wanna-build $version for $distribution on $arch\n"; + print "wanna-build $version for ".($distribution//"sid")." on $arch\n"; } if (!@ARGV && !isin( $op_mode, qw(list merge-quinn merge-partial-quinn import export @@ -2082,8 +2082,8 @@ sub add_user_info { sub lock_table { return if $simulate; - $dbh->do('LOCK TABLE ' . table_name() . - ' IN EXCLUSIVE MODE', undef) or die $dbh->errstr; + $dbh->do('SELECT 1 FROM ' . table_name() . + ' WHERE distribution = ? FOR UPDATE', undef, $distribution) or die $dbh->errstr; } sub parse_argv {