Diff
Not logged in

Differences From Artifact [c90bf21356]:

To Artifact [b926795672]:


1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536

1537

1538
1539
1540
1541
1542
1543
1544
	 */

	if (mode == infoPtr->initMode) {
	    infoPtr->flags &= ~CONSOLE_RESET;
	} else {
	    infoPtr->flags |= CONSOLE_RESET;
	}
	return TCL_OK;
    }

    if (infoPtr->flags & CONSOLE_READ_OPS) {
	return Tcl_BadChannelOption(interp, optionName, "inputmode");
    } else {
	return Tcl_BadChannelOption(interp, optionName, "");

    }

}

/*
 *----------------------------------------------------------------------
 *
 * ConsoleGetOptionProc --
 *







<
<
<
<
<
|
|
>

>







1523
1524
1525
1526
1527
1528
1529





1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
	 */

	if (mode == infoPtr->initMode) {
	    infoPtr->flags &= ~CONSOLE_RESET;
	} else {
	    infoPtr->flags |= CONSOLE_RESET;
	}





    } else if (len > 0) {
	return Tcl_BadChannelOption(interp, optionName,
		(infoPtr->flags & CONSOLE_READ_OPS) ? "inputmode" : "");
    }
    return TCL_OK;
}

/*
 *----------------------------------------------------------------------
 *
 * ConsoleGetOptionProc --
 *