Subversion Repositories SvarDOS

Rev

Rev 533 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 533 Rev 538
Line 104... Line 104...
104 
    }
 104 
    }
105 
    if (errcode == 0) {
 105 
    if (errcode == 0) {
106 
      sprintf(p->BUFFER, "Active code page: %d", nnn);
 106 
      sprintf(p->BUFFER, "Active code page: %d", nnn);
107 
      outputnl(p->BUFFER);
 107 
      outputnl(p->BUFFER);
108 
    } else {
 108 
    } else {
109 
      outputnl(doserr(errcode));
 109 
      nls_outputnl_doserr(errcode);
110 
      return(CMD_FAIL);
 110 
      return(CMD_FAIL);
111 
    }
 111 
    }
112 
  }
 112 
  }
113 
 
 113 
 
114 
  return(CMD_OK);
 114 
  return(CMD_OK);