Skip to content

Commit dff214b

Browse files
lightseyLeont
authored andcommitted
Fix precedence of module loading test in return statement.
1 parent f160c75 commit dff214b

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

lib/Perlpp/Extend.pm

+2-1
Original file line numberDiff line numberDiff line change
@@ -48,7 +48,8 @@ sub load_module {
4848
push @DynaLoader::dl_shared_objects, $file; # record files loaded
4949
push @DynaLoader::dl_modules, $module; # record loaded module
5050

51-
return $sub->($module) or croak "Something went horribly wrong during loading of $module";
51+
my $loaded = $sub->($module) or croak "Something went horribly wrong during loading of $module";
52+
return $loaded;
5253
}
5354

5455
1;

0 commit comments

Comments
 (0)