#!/bin/athena/tcsh

#define file names
set directory = /mit/library/firstsearch
set menu = $directory/menu
set doc  = $directory/doc
set help = $directory/help
set alpha = $directory/alpha
set commands = $directory/commands
set fconnect = `athdir /mit/library`/fconnect
set message = $directory/message.new
set temp = ~/.fstemptjo

# do we have a message today?
# try to find the file but don't let the user see the attempt
(find $message -print | tee $temp) > & /dev/null

# if the file is empty there is no message

if (-z $temp) then
else 
	cat $message
	echo -n "<CR> to continue"
	set pauser = $<
endif

rm $temp

$fconnect 3