diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-05-22 14:46:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2014-05-22 14:46:49 (GMT) |
| commit | 9ad951406b16aac72049cd90ba9f7ad7678ea7d7 (patch) | |
| tree | 85ef4e7b540edaf10bb7622c794290d65e85b965 /generic/tkCmds.c | |
| parent | 44f5fc24fed3e8fce2accea8bd57a5998c3829b5 (diff) | |
| download | tk-9ad951406b16aac72049cd90ba9f7ad7678ea7d7.zip tk-9ad951406b16aac72049cd90ba9f7ad7678ea7d7.tar.gz tk-9ad951406b16aac72049cd90ba9f7ad7678ea7d7.tar.bz2 | |
Make the "scrollbar" a real Tcl_Obj-based command. No change in functionality.
Diffstat (limited to 'generic/tkCmds.c')
| -rw-r--r-- | generic/tkCmds.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tkCmds.c b/generic/tkCmds.c index a4f2ed9..6196b17 100644 --- a/generic/tkCmds.c +++ b/generic/tkCmds.c @@ -2094,7 +2094,7 @@ TkGetDisplayOf( /* *---------------------------------------------------------------------- * - * TkDeadAppCmd -- + * TkDeadAppObjCmd -- * * If an application has been deleted then all Tk commands will be * re-bound to this function. @@ -2111,15 +2111,15 @@ TkGetDisplayOf( /* ARGSUSED */ int -TkDeadAppCmd( +TkDeadAppObjCmd( ClientData clientData, /* Dummy. */ Tcl_Interp *interp, /* Current interpreter. */ - int argc, /* Number of arguments. */ - const char **argv) /* Argument strings. */ + int objc, /* Number of arguments. */ + Tcl_Obj *const objv[]) /* Argument strings. */ { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "can't invoke \"%s\" command: application has been destroyed", - argv[0])); + Tcl_GetString(objv[0]))); return TCL_ERROR; } |