From a148bc21b766f4140cbfd09c58adec1f3939aa65 Mon Sep 17 00:00:00 2001 From: Dan Kogai Date: Tue, 30 Mar 2004 09:53:52 +0900 Subject: [PATCH] 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 --- ext/Errno/Errno_pm.PL | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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 -- 2.7.4