diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-02-05 23:12:19 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-02-05 23:12:19 +0000 |
| commit | 4d76e4b4b06e50f8d4823ad3dd37d8c202e442e0 (patch) | |
| tree | 42e80c4d0b532e8dabd0caf3a49266b92693d85d /NetWare/dl_netware.xs | |
| parent | b15a22ab7111cb08cbc38a0a816e11f3fc34a386 (diff) | |
| download | perl-4d76e4b4b06e50f8d4823ad3dd37d8c202e442e0.tar.gz | |
NetWare update from Ananth Kesari.
p4raw-id: //depot/perl@14567
Diffstat (limited to 'NetWare/dl_netware.xs')
| -rw-r--r-- | NetWare/dl_netware.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/NetWare/dl_netware.xs b/NetWare/dl_netware.xs index 766ceb8ffb..e02396b84a 100644 --- a/NetWare/dl_netware.xs +++ b/NetWare/dl_netware.xs @@ -107,11 +107,11 @@ dl_load_file(filename,flags=0) nlmHandle = FindNLMHandle(mod_name8); } } - //use UCSExt encountered- + //use Perl2UCS or UCSExt encountered : //initialize UCS, this has to be terminated when the script finishes execution //Is the script intending to use UCS Extensions? //This should be done once per script execution - if (strcmp(mod_name,"Perl2UCS.nlp")==0) + if ((strcmp(mod_name,"Perl2UCS.nlp")==0) || (strcmp(mod_name,"UCSExt.nlp")==0)) { unsigned int moduleHandle = 0; moduleHandle = FindNLMHandle("UCSCORE.NLM"); |