diff options
Diffstat (limited to 'src/if_perl.xs')
| -rw-r--r-- | src/if_perl.xs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/if_perl.xs b/src/if_perl.xs index 685c0bacd..19292b384 100644 --- a/src/if_perl.xs +++ b/src/if_perl.xs @@ -611,7 +611,12 @@ perl_runtime_link_init(char *libname, int verbose) perl_enabled(verbose) int verbose; { - return perl_runtime_link_init(DYNAMIC_PERL_DLL, verbose) == OK; +#if WIN3264 + char *dll = DYNAMIC_PERL_DLL; +#else + char *dll = *p_perldll ? (char *)p_perldll : DYNAMIC_PERL_DLL; +#endif + return perl_runtime_link_init(dll, verbose) == OK; } #endif /* DYNAMIC_PERL */ |