X-Git-Url: https://git.donarmstrong.com/?p=wannabuild.git;a=blobdiff_plain;f=bin%2Fwanna-build;h=477d5f4782871dce9cc6a3dd338968193096cc9d;hp=1fb5b901fab48469bb6b5759083d1b5f51a34579;hb=a79b1c9284e2013e4fa5cce66c001411db3ebee4;hpb=33f375d471ae7ba49c41eaa6771c79f75d6ad33e

diff --git a/bin/wanna-build b/bin/wanna-build
index 1fb5b90..477d5f4 100755
--- a/bin/wanna-build
+++ b/bin/wanna-build
@@ -348,6 +348,10 @@ if (isin($op_mode, qw<forget-user merge-v3 import>) && defined @conf::admin_user
 }
 if (!isin($op_mode, qw<distribution-architectures distribution-aliases>)) {
     die "need an architecture" unless $arch;
+    my $rows = $dbh->selectall_hashref('SELECT distribution as d from distribution_architectures where architecture=? and distribution=?', [qw<d>], undef, ($arch, $distribution)) if $distribution;
+    $rows = $dbh->selectall_hashref('SELECT distribution as d from distribution_architectures where architecture=?', [qw<d>], undef, ($arch,)) unless $rows;
+    die "architecture ($arch) does not exist (at least not for $distribution)" if !keys %$rows and $distribution;
+    die "architecture ($arch) does not exist" if !keys %$rows;
 }
 
 	SWITCH: foreach ($op_mode) {