proxmox-mirrors/perlmod
1
0
Fork 0
mirror of https://git.proxmox.com/git/perlmod synced 2025-10-05 05:26:54 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

perlmod-bin: actually use 'libfile'

Browse Source 
Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
This commit is contained in:
Wolfgang Bumiller 2023-12-18 10:36:49 +01:00
parent 71fe7e0e29
commit 760f47bdd5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
perlmod-bin/genpackage.pl
View File

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