+
+ for my $arch (@archuse?@archuse:@arch) {
+ my $dir="/var/lib/mock/$_-$arch";
+ -d $dir or error "No distro: $dir";
+ }
+
+ return ($_,@archuse);
+}
+
+# epel-\d-i386|fedora-\d-i386|fedora-rawhide-i386
+my @distrouse;
+for my $distroi (0..$#distro) {
+ my $distro=$distro[$distroi];
+ my $componentdistro=$componentdistro[$distroi];
+ my @archuse;
+ if ($componentdistro) {
+ ($componentdistro,@archuse)=distro_normalize $componentdistro;
+ @archuse and die "--cd|--componentdistro must have no arch: ".join(" ",@archuse);
+ }
+ ($distro,@archuse)=distro_normalize $distro;
+ $componentdistro||=$distro;