Tk Source Code

Check-in [52a6c719]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:remove duplicate code
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | core-8-5-branch
Files: files | file ages | folders
SHA1: 52a6c71921e2aa5834857eda7f764885a178c5b6
User & Date: jan.nijtmans 2013-01-24 13:30:44
Context
2013-01-31
11:27
Bug [3602534]: Test for XScreensaver last. check-in: c96d3630 user: stwo tags: core-8-5-branch
2013-01-24
14:00
Merge core-8-5-branch Various Tcl_GetIndexFromObj -> Tcl_GetIndexFromObjStruct changes. check-in: 472e3798 user: jan.nijtmans tags: trunk
13:30
remove duplicate code check-in: 52a6c719 user: jan.nijtmans tags: core-8-5-branch
2013-01-23
16:17
Eliminate use of deprecated Tcl_VarEval function from ttk. check-in: 75a151fd user: jan.nijtmans tags: core-8-5-branch
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to win/tkWinWm.c.

5300
5301
5302
5303
5304
5305
5306
5307
5308
5309
5310
5311
5312
5313
5314
5315
5316
5317
5318
    if (objc == 4) {
	if (wmPtr->iconFor != NULL) {
	    Tcl_AppendResult(interp, "can't change state of ",
		    Tcl_GetString(objv[2]), ": it is an icon for ",
		    Tk_PathName(wmPtr->iconFor), NULL);
	    return TCL_ERROR;
	}
	if (Tcl_GetIndexFromObj(interp, objv[3], optionStrings, "argument", 0,
		&index) != TCL_OK) {
	    return TCL_ERROR;
	}

	if (Tcl_GetIndexFromObj(interp, objv[3], optionStrings, "argument", 0,
		&index) != TCL_OK) {
	    return TCL_ERROR;
	}

	if (winPtr->flags & TK_EMBEDDED) {
	    int state = 0;







<
<
<
<
<







5300
5301
5302
5303
5304
5305
5306





5307
5308
5309
5310
5311
5312
5313
    if (objc == 4) {
	if (wmPtr->iconFor != NULL) {
	    Tcl_AppendResult(interp, "can't change state of ",
		    Tcl_GetString(objv[2]), ": it is an icon for ",
		    Tk_PathName(wmPtr->iconFor), NULL);
	    return TCL_ERROR;
	}





	if (Tcl_GetIndexFromObj(interp, objv[3], optionStrings, "argument", 0,
		&index) != TCL_OK) {
	    return TCL_ERROR;
	}

	if (winPtr->flags & TK_EMBEDDED) {
	    int state = 0;