/*
* quizzer.c
* Copyright Guy Albertelli II 1996
*/
#include <stdio.h>
#include <tcl.h>
#include <Capa/capaCommon.h>
#include <webpage.h>
#include <common.h>
Tcl_Interp *gInterp;
int Webpage_Init(Tcl_Interp *interp)
{
char buf[BUFFER_SIZE];
sprintf(buf,"%s.%s",MAJORVER,WEBPAGEMINORVER);
Tcl_SetVar(interp,"gVer",buf,TCL_GLOBAL_ONLY);
sprintf(buf,"Compiled on %s",COMPILE_DATE);
Tcl_SetVar(interp,"gCompileDate",buf,TCL_GLOBAL_ONLY);
return TCL_OK;
}
int Webpage_InitStandAlone(Tcl_Interp *interp)
{
return Webpage_Init(interp);
}
int Webpage_SafeInit(Tcl_Interp *interp)
{
return Webpage_Init(interp);
}
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>