Bug#1018289: perl: FTBFS on hurd-i386: NDBM not getting linked against libgdbm-compat

[Niko Tyni]

Control: tag -1 patch
Control: forwarded -1 https://github.com/Perl/perl5/pull/20267

On Tue, Aug 30, 2022 at 11:54:25PM +0300, Niko Tyni wrote:
> On Sun, Aug 28, 2022 at 01:41:48PM +0200, Samuel Thibault wrote:
> > Package: perl
> > Version: 5.34.0-5
> > Severity: important
> 
> > perl currently FTBFS on hurd-i386: 
> 
> > #     Error:  Can't load '../../lib/auto/NDBM_File/NDBM_File.so' for module NDBM_File: ../../lib/auto/NDBM_File/NDBM_File.so: undefined symbol: dbm_nextkey at ../../lib/XSLoader.pm line 93.
> > #   at ../../lib/NDBM_File.pm line 12.
> 
> I think this broke with
> 
>   https://github.com/Perl-Toolchain-Gang/ExtUtils-MakeMaker/pull/367
> 
> but nobody noticed until now.

> Something like this works but seems rather wordy and
> silly to repeat in all of those:
> 
> ------------------------------------------------------
>   my $hint_file = 'hints/linux.pl';
>   open(my $fh, '<', $hint_file)
>       or die "Could not open $hint_file for read: $!";
>   eval join('', <$fh>);
>   die "Failed to load hint file $hint_file: $@" if $@;
> ------------------------------------------------------
> 
> Guess I'll sleep on this and try to come up with something better.

Ended up proposing upstream just

-do './hints/linux.pl' or die $@;
+eval `cat hints/linux.pl` or die $@;

Patch attached. We'll see how it goes.
-- 
Niko
-------------- next part --------------
A non-text attachment was scrubbed...
Name: 0001-Fix-GNU-Hurd-kFreeBSD-kNetBSD-hint-files-in-several-.patch
Type: text/x-diff
Size: 4771 bytes
Desc: not available
URL: <http://alioth-lists.debian.net/pipermail/perl-maintainers/attachments/20220907/4dc2c8b9/attachment.patch>