Subversion Repositories SvarDOS

Rev

Rev 990 | Go to most recent revision | 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