Change 16104 by jhi@alpha on 2002/04/23 13:35:03

        NetWare tweak from C Aditya.

Affected files ...

.... //depot/perl/NetWare/Nwmain.c#7 edit
.... //depot/perl/NetWare/nw5.c#9 edit

Differences ...

==== //depot/perl/NetWare/Nwmain.c#7 (text) ====
Index: perl/NetWare/Nwmain.c
--- perl/NetWare/Nwmain.c.~1~   Tue Apr 23 07:45:05 2002
+++ perl/NetWare/Nwmain.c       Tue Apr 23 07:45:05 2002
@@ -181,7 +181,7 @@
                char sNUL[MAX_DN_BYTES] = {'\0'};
 
                strcpy(sNUL, NWDEFPERLROOT);
-               strcat(sNUL, "\\nul");
+               strcat(sNUL, "\\nwnul");
                if (access((const char *)sNUL, 0) != 0)
                {
                        // The file, "nul" is not found and so create the file.
@@ -313,7 +313,7 @@
                char sNUL[MAX_DN_BYTES] = {'\0'};
 
                strcpy(sNUL, NWDEFPERLROOT);
-               strcat(sNUL, "\\nul");
+               strcat(sNUL, "\\nwnul");
                if (access((const char *)sNUL, 0) == 0)
                {
                        // The file, "nul" is found and so delete it.

==== //depot/perl/NetWare/nw5.c#9 (text) ====
Index: perl/NetWare/nw5.c
--- perl/NetWare/nw5.c.~1~      Tue Apr 23 07:45:05 2002
+++ perl/NetWare/nw5.c  Tue Apr 23 07:45:05 2002
@@ -582,7 +582,7 @@
     va_end(ap);
 
        if (stricmp(path, "/dev/null")==0)
-       path = "NUL";
+       path = "NWNUL";
 
        return open(path, flag, pmode);
 }
End of Patch.

Reply via email to