minor arch collection method change

diff --git a/dev-lang/perl/ChangeLog b/dev-lang/perl/ChangeLog
index d6e9754b2879224a9d3343c66eed72d042750b78..8c51e907accf4435a6f5cb5f3cdfc4a6b3382f2a 100644 (file)
--- a/dev-lang/perl/ChangeLog
+++ b/dev-lang/perl/ChangeLog
@@ -1,6 +1,9 @@
 # ChangeLog for dev-lang/perl
 # Copyright 2002-2004 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/ChangeLog,v 1.92 2004/11/13 01:04:02 rac Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/ChangeLog,v 1.93 2004/11/14 01:00:27 rac Exp $
+
+  13 Nov 2004; Robert Coie <rac@gentoo.org> perl-5.8.5-r1.ebuild:
+  Go ahead and use the myarch that exists
 
 *perl-5.8.5-r1 (12 Nov 2004)
 

diff --git a/dev-lang/perl/Manifest b/dev-lang/perl/Manifest
index b82e1caf4a07bed8a63fdf11774b3a8b5c400bd6..b95610b78f4eca7da350989b5727edf9cdde36c6 100644 (file)
--- a/dev-lang/perl/Manifest
+++ b/dev-lang/perl/Manifest
@@ -1,7 +1,7 @@
 MD5 bf56ee74ad687ee93d617e0897514b11 perl-5.8.2-r1.ebuild 10010
-MD5 75aaefd1d626e5848ed45e1f4ef3dbda ChangeLog 29811
+MD5 965a64b58a6594b3d4b4c1119707b78d ChangeLog 29920
 MD5 e2d8f1bf77722def1dd432e26455c818 metadata.xml 305
-MD5 c6ad04deb0ecefb9930fba98905a200c perl-5.8.5-r1.ebuild 11595
+MD5 eb87d12c071d618361010dc200c96a80 perl-5.8.5-r1.ebuild 11327
 MD5 55eb9292a050b8a1f33bdb7a3a4177aa perl-5.8.4-r1.ebuild 12148
 MD5 a54ea97c178e1be3a56f3fbcc280743a perl-5.8.4.ebuild 10775
 MD5 f26a32cd5257f9f0f9582cea15a1836b perl-5.8.5.ebuild 11515

diff --git a/dev-lang/perl/perl-5.8.5-r1.ebuild b/dev-lang/perl/perl-5.8.5-r1.ebuild
index 5a2048d22bc7aa75c7a5e89f8406375dcb8ae62a..572ff90f9de111b5bd71bb902c9e186ef749f2c1 100644 (file)
--- a/dev-lang/perl/perl-5.8.5-r1.ebuild
+++ b/dev-lang/perl/perl-5.8.5-r1.ebuild
@@ -1,6 +1,6 @@
 # Copyright 1999-2004 Gentoo Foundation
 # Distributed under the terms of the GNU General Public License v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/perl-5.8.5-r1.ebuild,v 1.1 2004/11/13 01:04:02 rac Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/perl-5.8.5-r1.ebuild,v 1.2 2004/11/14 01:00:27 rac Exp $
 
 inherit eutils flag-o-matic gcc
 
@@ -115,14 +115,6 @@ src_unpack() {
 
 src_configure() {
 
-       # this attempts to mimic (and the code is directly derived from)
-       # Configure's attempt to guess archname.  it will be appended to
-       # the old versions to search.
-
-       local perlarch=$(echo $(arch)-$(uname | sed -e 's/^[^=]*=//' -e 's/\///g' \
-               | tr '[A-Z]' '[a-z]'))
-       local inclist=$(for v in $PERL_OLDVERSEN; do echo -n "$v $v/$perlarch "; done)
-
        # some arches and -O do not mix :)
        use arm && replace-flags -O? -O1
        use ppc && replace-flags -O? -O1
@@ -145,6 +137,8 @@ src_configure() {
                myarch="${CHOST%%-*}-linux"
        fi
 
+       local inclist=$(for v in $PERL_OLDVERSEN; do echo -n "$v $v/$myarch "; done)
+
        # allow either gdbm to provide ndbm (in <gdbm/ndbm.h>) or db1
 
        myndbm='U'