Subversion Repositories SvarDOS

Rev

Rev 990 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 990 Rev 1001
Line 85... Line 85...
85 
 
 85 
 
86 
  /* is this about deleting all content inside a directory? if no per-file
86 
  /* is this about deleting all content inside a directory? if no per-file
87 
   * confirmation set, ask for a global confirmation */
 87 
   * confirmation set, ask for a global confirmation */
88 
  if ((confirmflag == 0) && (imatch(buff + pathlimit, "????????.???"))) {
 88 
  if ((confirmflag == 0) && (imatch(buff + pathlimit, "????????.???"))) {
89 
    nls_outputnl(36,5); /* "All files in directory will be deleted!" */
 89 
    nls_outputnl(36,5); /* "All files in directory will be deleted!" */
90 
    if (askchoice(svarlang_str(36,6)/*"Are you sure (Y/N)?"*/, svarlang_str(0,10)/*"YN"*/) != 0) return(CMD_FAIL);
 90 
    if (askchoice(svarlang_str(36,6)/*"Are you sure?"*/, svarlang_str(0,10)/*"YN"*/) != 0) return(CMD_FAIL);
91 
  }
 91 
  }
92 
 
 92 
 
93 
  for (i = 0;; i = 1) {
 93 
  for (i = 0;; i = 1) {
94 
 
 94 
 
95 
    /* exec FindFirst or FindNext */
 95 
    /* exec FindFirst or FindNext */
Line 111... Line 111...
111 
 
 111 
 
112 
    /* ask if confirmation required: PLIK.TXT  Delete (Y/N)? */
 112 
    /* ask if confirmation required: PLIK.TXT  Delete (Y/N)? */
113 
    if (confirmflag) {
 113 
    if (confirmflag) {
114 
      output(buff);
 114 
      output(buff);
115 
      output(" \t");
 115 
      output(" \t");
116 
      if (askchoice(svarlang_str(36,7)/*"Delete (Y/N)?"*/, svarlang_str(0,10)) != 0) continue;
 116 
      if (askchoice(svarlang_str(36,7)/*"Delete?"*/, svarlang_str(0,10)) != 0) continue;
117 
    }
 117 
    }
118 
 
 118 
 
119 
    /* del found file */
 119 
    /* del found file */
120 
    _asm {
 120 
    _asm {
121 
      push ax
 121 
      push ax