NetWare update from Ananth Kesari.
[p5sagit/p5-mst-13.2.git] / NetWare / nw5.c
index 5fe6ad3..fa57c6e 100644 (file)
@@ -104,8 +104,22 @@ nw_setbuf(FILE *pf, char *buf)
 int
 nw_setmode(FILE *fp, int mode)
 {
+/**
+       // Commented since a few abends were happening in fnFpSetMode
        int *dummy = 0;
        return(fnFpSetMode(fp, mode, dummy));
+**/
+
+       int handle = -1;
+       errno = 0;
+
+       handle = fileno(fp);
+       if (errno)
+       {
+               errno = 0;
+               return -1;
+       }
+       return setmode(handle, mode);
 }
 
 int