From da67bd88d6c635f9d031e38a53900e1f9be8567a Mon Sep 17 00:00:00 2001
From: Olivier Thauvin <nanardon@mandriva.org>
Date: Mon, 25 Jun 2007 13:53:44 +0000
Subject: - make our platform more comprehensive for other vendor

---
 genplatform.in | 19 +++++++++++--------
 1 file changed, 11 insertions(+), 8 deletions(-)

diff --git a/genplatform.in b/genplatform.in
index e2c9497..fc6bf82 100644
--- a/genplatform.in
+++ b/genplatform.in
@@ -9,16 +9,19 @@ my @ALLARCH=qw{
     @RPMALLARCH@
 };
 
+my $anysuffix = '-.*-@RPMOS@-gnu';
 my $suffix = '-@RPMCANONVENDOR@-@RPMOS@-gnu';
 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;
-    $done{$arch} and next;
-    $done{$arch} = 1;
-    print "$arch$suffix\n";
+foreach my $suf ($suffix, $anysuffix) {
+    my $found = 0;
+    my %done = ();
+    foreach my $arch (reverse @ALLARCH) {
+        $arch eq $canonarch and $found = 1;
+        $found or next;
+        $done{$arch} and next;
+        $done{$arch} = 1;
+        print "$arch$suf\n";
+    }
 }
-- 
cgit v1.2.1