diff options
Diffstat (limited to 'genplatform.in')
-rw-r--r-- | genplatform.in | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/genplatform.in b/genplatform.in index 0a22495..e2c9497 100644 --- a/genplatform.in +++ b/genplatform.in @@ -5,6 +5,7 @@ use strict; use warnings; my @ALLARCH=qw{ + noarch @RPMALLARCH@ }; @@ -13,8 +14,11 @@ my $canonarch = $ARGV[0] || `uname -m`; chomp($canonarch); my $found = 0; +my %done = (); foreach my $arch (reverse @ALLARCH) { $arch eq $canonarch and $found = 1; $found or next; - printf "$arch$suffix\n"; + $done{$arch} and next; + $done{$arch} = 1; + print "$arch$suffix\n"; } |