--- capa/capa51/GUITools/manager.init.c 1999/09/28 21:25:37 1.1.1.1 +++ capa/capa51/GUITools/manager.init.c 2000/08/04 15:54:49 1.5 @@ -1,12 +1,36 @@ +/* initialization routines for manager + Copyright (C) 1992-2000 Michigan State University + + The CAPA system is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public License as + published by the Free Software Foundation; either version 2 of the + License, or (at your option) any later version. + + The CAPA system is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with the CAPA system; see the file COPYING. If not, + write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. + + As a special exception, you have permission to link this program + with the TtH/TtM library and distribute executables, as long as you + follow the requirements of the GNU GPL in regard to all of the + software in the executable aside from TtH/TtM. +*/ + /* - * manager.c - * Copyright Guy Albertelli II 1996 + * manager.init.c + * Guy Albertelli II 1996 */ #include #include #include #include -#include +#include #include #include "manager.h" #include @@ -27,9 +51,14 @@ int Manager_Init(Tcl_Interp *interp) /*Tcl_CreateCommand( interp, "name", cname, (ClientData)NULL, (Tcl_CmdDeleteProc *)NULL); */ + Tcl_CreateCommand(interp, "CTcreateSummary", capaCTcreateSummary, + (ClientData)NULL, (Tcl_CmdDeleteProc *)NULL); Tcl_CreateCommand(interp, "getExistingSections", capaGetExistingSections, (ClientData)NULL, (Tcl_CmdDeleteProc *)NULL); - + Tcl_CreateCommand( interp, "getSpecificCapaId", capaGetSpecifiCapaId, + (ClientData)NULL, (Tcl_CmdDeleteProc *)NULL); + Tcl_CreateCommand( interp, "isSetOpen", capaIsSetOpen, + (ClientData)NULL, (Tcl_CmdDeleteProc *)NULL); sprintf(buf,"%s.%s",MAJORVER,MANAGERMINORVER); Tcl_SetVar(interp,"gVer",buf,TCL_GLOBAL_ONLY); sprintf(buf,"Compiled on %s",COMPILE_DATE);