diff options
author | petasis <petasis@f3661a36-4baa-549a-d6c7-40e0ffef350e> | 2010-08-04 07:35:21 (GMT) |
---|---|---|
committer | petasis <petasis@f3661a36-4baa-549a-d6c7-40e0ffef350e> | 2010-08-04 07:35:21 (GMT) |
commit | 0da2f1f4f50734ec41da14d44c874102e5ee18c8 (patch) | |
tree | ffc392801790d286edea2c574f88904adcbf7409 /unix | |
parent | 9cae0e68edc6020067a63490089a617f66987c2b (diff) | |
download | tkdnd-0da2f1f4f50734ec41da14d44c874102e5ee18c8.zip tkdnd-0da2f1f4f50734ec41da14d44c874102e5ee18c8.tar.gz tkdnd-0da2f1f4f50734ec41da14d44c874102e5ee18c8.tar.bz2 |
TkDND 2.2
Diffstat (limited to 'unix')
-rw-r--r-- | unix/TkDND_XDND.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/unix/TkDND_XDND.c b/unix/TkDND_XDND.c index 11a202d..01bc920 100644 --- a/unix/TkDND_XDND.c +++ b/unix/TkDND_XDND.c @@ -412,7 +412,9 @@ int TkDND_GetSelectionObjCmd(ClientData clientData, Tcl_Interp *interp, return TCL_ERROR; } - if (Tcl_GetLongFromObj(interp, objv[2], &time) != TCL_OK) return TCL_ERROR; + if (Tcl_GetLongFromObj(interp, objv[2], (long *) &time) != TCL_OK) { + return TCL_ERROR; + } path = TkDND_TkWin(objv[1]); selection = Tk_InternAtom(path, "XdndSelection"); |