On 4/16/05, Zoran Vasiljevic <[EMAIL PROTECTED]> wrote:
>
> *** 1240,1254 ****
> break;
>
> ! case CStatusIdx:
> ! if (objc > 2) {
> ! int new_status;
> ! if (Tcl_GetIntFromObj(interp, objv[2], &new_status) !=
> TCL_OK) {
> ! Tcl_AppendResult(interp, "Invalid response status
> code", NULL );
> ! return TCL_ERROR;
> ! }
> ! Ns_ConnSetResponseStatus(conn, new_status);
> }
> ! Tcl_SetIntObj(result, Ns_ConnResponseStatus(conn));
> ! break;
>
> case CSockIdx:
> --- 1248,1264 ----
> break;
>
> ! case CStatusIdx:
> ! if (objc < 2 || objc > 3) {
> ! Tcl_WrongNumArgs(interp, 2, objv, "?status?");
> ! return TCL_ERROR;
> ! } else if (objc == 3) {
> ! int status;
> ! if (Tcl_GetIntFromObj(interp, objv[2], &status) != TCL_OK) {
> ! return TCL_ERROR;
> }
> ! Ns_ConnSetResponseStatus(conn, status);
> ! }
> ! Tcl_SetIntObj(result, Ns_ConnResponseStatus(conn));
> ! break;
>
> case CSockIdx:
Hmm, I think this should return the old status, right?
http://sourceforge.net/mailarchive/message.php?msg_id=11097883
