|
|
@@ -197,7 +197,7 @@ if ($opmode eq 'build') {
|
|
|
} else {
|
|
|
for $a (split(/\s+/,$v)) {
|
|
|
&error("`$a' is not a legal architecture string")
|
|
|
- unless $a =~ /^[\w-]$/;
|
|
|
+ unless $a =~ /^[\w-]+$/;
|
|
|
&error("architecture $a only allowed on its own".
|
|
|
" (list for package $p is `$a')")
|
|
|
if grep($a eq $_, 'any','all');
|