/**********************************************************************
 * lucy_init.c -- init-meetings routine for lucy
 *
 * $Source$
 * $Author$
 * $Header$
 *
 * Copyright 1990 by the Massachusetts Institute of Technology.
 * For copying and distribution information, see the file
 * "mit-copyright.h".
 **********************************************************************/
#include "mit-copyright.h"

#ifndef lint
static char rcsid_lucy_init_c[] = "$Header$";
#endif /* lint */

#include <stdio.h>
#include <sys/file.h>
#include "lucy/lucy.h"
tfile unix_tfile();		/* XXX should be in discuss .h file */

/* XXX This is a really broken idea and should be rethought */
void
lucy_init(argc, argv)
     int argc;
     char *argv[];
{
  long code;
  char mtgfile[128];

  sprintf(mtgfile, "%s/.meetings.lucy", getenv(HOME));
  if (access(mtgfile)) {
    lucy_append_file("/afs/athena/astaff/project/lucydev/.meetings",
		     mtgfile);
  }