Guillem Jover wrote:
> # Returns a list of packages in the control file.
> # Must pass "arch" or "indep" or "same" to specify arch-dependant or
> # -independant or same arch packages. If nothing is specified, returns all
> @@ -616,7 +628,7 @@
> if ($package &&
> (($type eq 'indep' && $arch eq 'all') ||
> ($type eq 'arch' && $arch ne 'all') ||
> - ($type eq 'same' && ($arch eq 'any' || $arch =~
> /(^|\s)$buildarch(\s|$)/)) ||
> + ($type eq 'same' && ($arch eq 'any' ||
> samearch($buildarch, $arch) ||
> ! $type)) {
> push @list, $package;
> $package="";Your parens don't close properly.. -- see shy jo
signature.asc
Description: Digital signature

