#!/bin/sh
#
#  CacheManager - Runs the Tcl/Tk-based Harvest object cache manager
#
#  $Id: CacheManager,v 1.2 1995/04/03 17:06:04 hardy Exp $
#

# WISH_CMD is the wish interpreter to use
WISH_CMD=dpwish

# set load path for the XF interface builder library
if test -z "$XF_LOAD_PATH"; then
	XF_LOAD_PATH=/usr/local/lib/;
else
	XF_LOAD_PATH=$XF_LOAD_PATH:/usr/local/lib/;
fi
export XF_LOAD_PATH

# set Harvest home
if test -z "$HARVEST_HOME"; then
	HARVEST_HOME=/usr/local/harvest; 
fi
export HARVEST_HOME

if test -r "$HARVEST_HOME/lib/cache/cachemanager/Manager.tcl"; then
	exec $WISH_CMD \
		-name Manager.tcl \
	 	-file $HARVEST_HOME/lib/cache/cachemanager/Manager.tcl
fi
echo "CacheManager: Cannot read $HARVEST_HOME/lib/cache/cachemanager/Manager.tcl"
exit 1
