home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / ALLMODS.ZIP / M&M007C.ZIP / M&M007C.FIX < prev   
Encoding:
Text File  |  1995-06-30  |  1.8 KB  |  51 lines
  1. Snorkel #1 @2100
  2. Wed Jun 28 14:48:35 1995
  3. Bug fix for M&M007C.MOD.  This fix has been incorporated into M&M007D.MOD.
  4.  
  5. This corrects a bug which was preventing the BBS from exiting the rename 
  6. function if you pressed "F" and then answered "NO" to the question about 
  7. making the file free.
  8.  
  9.  
  10. ┌───────────┐
  11. │ XFEROVL.C │
  12. └───────────┘
  13.  
  14.     prt(5,get_string(830));                       /* search for */
  15.     ch=ynq();                   /* DELETE THIS LINE */
  16.     ch=onek("QNYF");                               /* ADD */
  17.     if (ch=='Q')
  18.       break;
  19.     else
  20.       if (ch=='N') {
  21.         i=nrecno(s3,cp);
  22.         continue;
  23.       }
  24.     if (ch=='F') {                                 /* ADD */
  25.       om=u.mask;                                   /* ADD */
  26.       u.mask &= ~mask_free_file;                   /* ADD */
  27.       nl();                                        /* ADD */
  28.       outstr("5Make the file FREE? <CR>=N ");     /* ADD */0
  29.       if (yn())                                    /* ADD */
  30.         u.mask|=mask_free_file;                    /* ADD */
  31.       if (om!=u.mask) {                            /* ADD */
  32.         f=sh_open(dlfn,O_RDWR | O_BINARY | O_CREAT, S_IREAD | S_IWRITE);//ADD
  33.         SETREC(f,i);                               /* ADD */
  34.         sh_write(f,(void *)&u,sizeof(uploadsrec)); /* ADD */
  35.         f=sh_close(f);                             /* ADD */
  36.         i=nrecno(s3,cp);                           /* ADD */
  37.         continue;//   6<2─────── 4to here2 ──────────┐        6ADD0
  38.       }                                          2│0 /* ADD */
  39.       continue;// 2── 4move this line from here2 ───┘          6DELETE0
  40.     }                                              /* ADD */
  41.     nl();
  42.     prt(2,get_string(72));
  43.  
  44.  
  45.  
  46. 1    °0
  47. 1  °0
  48. 1  °0
  49. 1°0
  50. 4Snorkel 1@21000
  51.