#! /bin/csh -f

if ($?WILLOW_MSG) then
	set NOMSG = $WILLOW_MSG
else
	set NOMSG = 0
endif

if ($1 == "-nomsg") then
	set NOMSG = 1
endif

#  Send User a warning message  if necessary
#
if (-e "$WGFILE" &&  $NOMSG == 0 ) then
   zwrite $USER > /dev/null << EOF
 
On September 5, 1996, the database
@i(Elsevier Materials Science Journals)
is GOING AWAY.  (It has not been updated since
December 31, 1995.  We are finally getting around
to shutting off its service host.)

If you have need for the bibliographic data or article images
from this database, contact bug-library@mit.edu @b(IMMEDIATELY).

Please email problems to bug-library@mit.edu

@i(You can suppress this message by starting willow with the)
@i("-nomsg" option or by adding the following line to your .environment file:)
 
    setenv WILLOW_MSG 1
 
EOF
else if ( $NOMSG == 0 ) then
   cat << EOF
 
On September 5, 1996, the database
Elsevier Materials Science Journals
is GOING AWAY.  (It has not been updated since
December 31, 1995.  We are finally getting around
to shutting off its service host.)

If you have need for the bibliographic data or article images
from this database, contact bug-library@mit.edu IMMEDIATELY.

Please email problems to bug-library@mit.edu
 
==> You can suppress this message by starting willow with
the "-nomsg" option or by adding the following line
to your .environment file:
 
    setenv WILLOW_MSG 1

EOF
 
endif

setenv HOSTTYPE `machtype`

if (($HOSTTYPE == 'decmips') || ($HOSTTYPE == 'rsaix') || ($HOSTTYPE == 'sun4')) then
  setenv XNLSPATH /mit/library/shared/nls
endif

setenv XKEYSYMDB /mit/library/$HOSTTYPE/willow_24/app-defaults/XKeysymDB
setenv XFILESEARCHPATH /mit/library/$HOSTTYPE/willow_24/%T/%N
exec /mit/library/$HOSTTYPE/willow_24/willow $*