diff options
| author | ericm <ericm> | 2000-08-02 01:33:32 (GMT) |
|---|---|---|
| committer | ericm <ericm> | 2000-08-02 01:33:32 (GMT) |
| commit | 61960a51b2a77b7e4fa2d10e6bf2aece9d789515 (patch) | |
| tree | f3a397163c2672f471105a39736bf0ec4c3efa73 /generic/tkWindow.c | |
| parent | 4a04aa98795023308d2248da758575040a3c2bb8 (diff) | |
| download | tk-61960a51b2a77b7e4fa2d10e6bf2aece9d789515.zip tk-61960a51b2a77b7e4fa2d10e6bf2aece9d789515.tar.gz tk-61960a51b2a77b7e4fa2d10e6bf2aece9d789515.tar.bz2 | |
* generic/tkInt.h: Replaced prototype for Tk_MessageCmd with
prototype for Tk_MessageObjCmd.
* generic/tkWindow.c: Marked message command as using the new
MessageObjCmd instead of the old MessageCmd.
* tests/message.test: Added tests for the message widget.
* generic/tkMessage.c: Obj'ified the message widget.
* generic/tkInt.h: Removed prototype for Tk_ClipboardCmd, added
prototype for Tk_ClipboardObjCmd.
* generic/tkWindow.c: Updated function pointers for clipboard
command to use Tcl_Obj version.
Diffstat (limited to 'generic/tkWindow.c')
| -rw-r--r-- | generic/tkWindow.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkWindow.c b/generic/tkWindow.c index d1238ac..c2bc9fb 100644 --- a/generic/tkWindow.c +++ b/generic/tkWindow.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWindow.c,v 1.18 2000/05/29 01:43:14 hobbs Exp $ + * RCS: @(#) $Id: tkWindow.c,v 1.19 2000/08/02 01:33:33 ericm Exp $ */ #include "tkPort.h" @@ -100,7 +100,7 @@ static TkCmd commands[] = { {"bell", NULL, Tk_BellObjCmd, 0, 1}, {"bind", Tk_BindCmd, NULL, 1, 1}, {"bindtags", Tk_BindtagsCmd, NULL, 1, 1}, - {"clipboard", Tk_ClipboardCmd, NULL, 0, 1}, + {"clipboard", NULL, Tk_ClipboardObjCmd, 0, 1}, {"destroy", NULL, Tk_DestroyObjCmd, 1, 1}, {"event", NULL, Tk_EventObjCmd, 1, 1}, {"focus", NULL, Tk_FocusObjCmd, 1, 1}, @@ -141,7 +141,7 @@ static TkCmd commands[] = { {"label", NULL, Tk_LabelObjCmd, 1, 0}, {"listbox", NULL, Tk_ListboxObjCmd, 1, 0}, {"menubutton", NULL, Tk_MenubuttonObjCmd, 1, 0}, - {"message", Tk_MessageCmd, NULL, 1, 1}, + {"message", NULL, Tk_MessageObjCmd, 1, 0}, {"radiobutton", NULL, Tk_RadiobuttonObjCmd, 1, 0}, {"scale", NULL, Tk_ScaleObjCmd, 1, 0}, {"scrollbar", Tk_ScrollbarCmd, NULL, 1, 1}, |