]> git.donarmstrong.com Git - wannabuild.git/blobdiff - bin/wanna-build
add transform_schema.sql as old migration
[wannabuild.git] / bin / wanna-build
index cd2db3acc1964e079181d969db8da869f91429f6..bc092cf4d0638ccb5412521cfb245c5aac054f94 100755 (executable)
@@ -273,8 +273,8 @@ if (!isin ( $op_mode, qw(list) ) && ( ($distribution//"") =~ /[ ,]/)) {
 # a proper error.
 
 if ($verbose) {
-       my $version = '$Revision: db181a534e9d $ $Date: 2008/03/26 06:20:22 $ $Author: rmurray $';
-       $version =~ s/(^\$| \$ .*$)//g;
+       my $version = '$Id$';
+       $version =~ s/^.* ([a-f0-9]+) .*$/\1/g;
        print "wanna-build $version for ".($distribution//"sid")." on $arch\n";
 }
 
@@ -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 {