summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/crypto.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/crypto.pm b/perl-install/crypto.pm
index 19fe7d397..426e9bf6e 100644
--- a/perl-install/crypto.pm
+++ b/perl-install/crypto.pm
@@ -106,7 +106,7 @@ sub mirrors {
my %arch_mirror;
foreach (<$f>) {
my ($arch, $url, $dir) = m|$distro_type([^:]*):ftp://([^/]*)(/\S*)| or next;
- defined $strict_arch && $arch eq $strict_arch or next;
+ $strict_arch && $arch eq $strict_arch and next;
MDK::Common::System::compat_arch($arch) or next;
$arch eq $our_arch and $strict_arch = $arch;
my $land = N("United States");