diff options
| author | das <das@noemail.net> | 2007-06-03 13:44:39 (GMT) |
|---|---|---|
| committer | das <das@noemail.net> | 2007-06-03 13:44:39 (GMT) |
| commit | f867932dbbe54b856d2315c6eee3024c3ec539c3 (patch) | |
| tree | 9248438c5bba7b4ad8f6827e210d7109fa3b588f /macosx/tkMacOSXSend.c | |
| parent | 33145f2df2675c33df4e6cba7102f0ada285da1f (diff) | |
| download | tk-f867932dbbe54b856d2315c6eee3024c3ec539c3.zip tk-f867932dbbe54b856d2315c6eee3024c3ec539c3.tar.gz tk-f867932dbbe54b856d2315c6eee3024c3ec539c3.tar.bz2 | |
* macosx/tkMacOSXDraw.c: comment formatting fix for Xcode 3.0.
* macosx/tkMacOSXEmbed.c:
* macosx/tkMacOSXEntry.c:
* macosx/tkMacOSXFont.c:
* macosx/tkMacOSXKeyEvent.c:
* macosx/tkMacOSXKeyboard.c:
* macosx/tkMacOSXMenus.c:
* macosx/tkMacOSXSend.c:
* macosx/tkMacOSXSubwindows.c:
* macosx/tkMacOSXWindowEvent.c:
* macosx/tkMacOSXWm.c:
* macosx/tkMacOSXXStubs.c:
FossilOrigin-Name: c295229c1ce5a4bd016ce570e98a79409ad5c368
Diffstat (limited to 'macosx/tkMacOSXSend.c')
| -rw-r--r-- | macosx/tkMacOSXSend.c | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/macosx/tkMacOSXSend.c b/macosx/tkMacOSXSend.c index 179beb6..8e4a701 100644 --- a/macosx/tkMacOSXSend.c +++ b/macosx/tkMacOSXSend.c @@ -33,7 +33,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacOSXSend.c,v 1.6 2007/04/23 21:24:34 das Exp $ + * RCS: @(#) $Id: tkMacOSXSend.c,v 1.7 2007/06/03 13:44:40 das Exp $ */ #include "tkMacOSXInt.h" @@ -297,8 +297,12 @@ Tk_SetAppName( interpListPtr = riPtr; strcpy(riPtr->name, actualName); + /* + * TODO: DeleteProc + */ + Tcl_CreateObjCommand(interp, "send", Tk_SendObjCmd, - (ClientData) riPtr, NULL /* TODO: DeleteProc */); + (ClientData) riPtr, NULL); if (Tcl_IsSafe(interp)) { Tcl_HideCommand(interp, "send", "send"); } @@ -439,8 +443,8 @@ Tk_SendObjCmd( Tcl_Release((ClientData) localInterp); } else { /* - * This is a non-local request. Send the script to the server and poll - * it for a result. TODO!!! + * TODO: This is a non-local request. Send the script to the server and + * poll it for a result. */ } |