We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 120ff08 commit 2656070Copy full SHA for 2656070
src/ModuleLoader.pm
@@ -123,6 +123,9 @@ knowhow ModuleLoader {
123
# May be fake executable, so may not end in .pbc. If so, add it.
124
# Strip any .exe.
125
my $module_name := ((pir::getinterp__P())[2])[0];
126
+ if pir::substr($module_name, 0, 2) eq './' {
127
+ $module_name := pir::substr($module_name, 2, pir::length($module_name) - 2);
128
+ }
129
if pir::substr($module_name, pir::length($module_name) - 4, 4) eq '.pbc' {
130
# Fine as it is.
131
}
0 commit comments