Subversion Repositories SvarDOS

Rev

Rev 533 | Rev 989 | 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);