perlre: Fix some line wrap issues

[perl5.git] / NetWare / Nwpipe.c

diff --git a/NetWare/Nwpipe.c b/NetWare/Nwpipe.c
index 2da2b06..9caf2da 100644 (file)
--- a/NetWare/Nwpipe.c
+++ b/NetWare/Nwpipe.c
@@ -344,7 +344,7 @@ FILE* fnPipeFileOpen(PTEMPPIPEFILE ptpf, char* command, char* mode)
 
        // Create a temporary file name
        //
-       strncpy ( tempName, fnNwGetEnvironmentStr((char *)"TEMP", DEFTEMP), (_MAX_PATH - 20) );
+       strncpy ( tempName, fnNwGetEnvironmentStr((char *)"TEMP", NWDEFPERLTEMP), (_MAX_PATH - 20) );
        tempName[_MAX_PATH-20] = '\0';
        strcat(tempName, (char *)"\\plXXXXXX.tmp");
        if (!fnMy_MkTemp(tempName))