diff options
| author | Kevin Walzer <kw@codebykevin.com> | 2021-08-17 01:14:13 (GMT) |
|---|---|---|
| committer | Kevin Walzer <kw@codebykevin.com> | 2021-08-17 01:14:13 (GMT) |
| commit | e02bd57b0aed182ae341187acb8f95ed67c79710 (patch) | |
| tree | 1e99b601edd06558fe22d3691828f689b2fbae98 /unix/tkUnixWm.c | |
| parent | 894e012be469ccf33af304775715605b177c44a6 (diff) | |
| download | tk-e02bd57b0aed182ae341187acb8f95ed67c79710.zip tk-e02bd57b0aed182ae341187acb8f95ed67c79710.tar.gz tk-e02bd57b0aed182ae341187acb8f95ed67c79710.tar.bz2 | |
Minor adjustments/updates
Diffstat (limited to 'unix/tkUnixWm.c')
| -rw-r--r-- | unix/tkUnixWm.c | 32 |
1 files changed, 15 insertions, 17 deletions
diff --git a/unix/tkUnixWm.c b/unix/tkUnixWm.c index eba322d..627ab74 100644 --- a/unix/tkUnixWm.c +++ b/unix/tkUnixWm.c @@ -2152,25 +2152,23 @@ WmIconbadgeCmd( int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ { - (void) tkWin; + (void) tkWin; - if (objc < 4) { - Tcl_WrongNumArgs(interp, 2, objv, - "window ? badge?"); - return TCL_ERROR; - } + if (objc < 4) { + Tcl_WrongNumArgs(interp, 2, objv, + "window ? badge?"); + return TCL_ERROR; + } - char cmd[4096]; - sprintf(cmd, "::tk::icons::IconBadge {%s} {%s}", - Tcl_GetString(objv[2]), - Tcl_GetString(objv[3])); - if (Tcl_EvalEx(interp, cmd, -1, TCL_EVAL_DIRECT) != TCL_OK) { - Tcl_SetResult(interp,"Unable to set icon badge",TCL_VOLATILE); - return TCL_ERROR; - } - - - return TCL_OK; + char cmd[4096]; + sprintf(cmd, "::tk::icons::IconBadge {%s} {%s}", + Tcl_GetString(objv[2]), + Tcl_GetString(objv[3])); + if (Tcl_EvalEx(interp, cmd, -1, TCL_EVAL_DIRECT) != TCL_OK) { + Tcl_SetResult(interp,"Unable to set icon badge",TCL_VOLATILE); + return TCL_ERROR; + } + return TCL_OK; } /* *---------------------------------------------------------------------- |