perlmod-bin: fix generated libfile invocation

Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
This commit is contained in:
Wolfgang Bumiller 2024-01-02 14:13:34 +01:00
parent 55418e22f6
commit ff16830506

View File

@ -164,14 +164,14 @@ sub find_lib {
}
# Keep on a single line, potentially modified by testsuite!
sub libfile { find_lib($pkg->library()) }
sub libfile { find_lib(library()) }
sub load : prototype($) {
my ($pkg) = @_;
my $mod_name = $pkg->library();
my $mod_file = libfile($mod_name);
my $mod_file = libfile();
die "failed to locate shared library for $mod_name (lib${mod_name}.so)\n" if !$mod_file;
my $lib = DynaLoader::dl_load_file($mod_file)