From: Dan Kogai <dankogai@dan.co.jp>
Date: Tue, 30 Mar 2004 00:53:52 +0000 (+0900)
Subject: Zaurus SL-[78]60 native compile patch
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a148bc21b766f4140cbfd09c58adec1f3939aa65;p=p5sagit%2Fp5-mst-13.2.git

Zaurus SL-[78]60 native compile patch
Message-Id: <46DCC0BF-8199-11D8-8D5B-000A95DBB50A@dan.co.jp>
Date: Tue, 30 Mar 2004 00:53:52 +0900

p4raw-id: //depot/perl@22614
---

diff --git a/ext/Errno/Errno_pm.PL b/ext/Errno/Errno_pm.PL
index 22171fa..fdab9ee 100644
--- a/ext/Errno/Errno_pm.PL
+++ b/ext/Errno/Errno_pm.PL
@@ -109,7 +109,9 @@ sub get_files {
 	     ) {
 	# Some Linuxes have weird errno.hs which generate
 	# no #file or #line directives
-	$file{'/usr/include/errno.h'} = 1;
+	my $linux_errno_h = -e '/usr/include/errno.h' ?
+	    '/usr/include/errno.h' : '/usr/local/include/errno.h';
+	$file{$linux_errno_h} = 1;
     } elsif ($^O eq 'MacOS') {
 	# note that we are only getting the GUSI errno's here ...
 	# we might miss out on compiler-specific ones