// (C) Copyright IBM Corp. 2001 - 2002 All Rights Reserved.
//
// annotate.js
//
// last upload: Mar 28, 2002 (trireme)
// last update: Mar 28, 2002

function testLocalSrvAnnot(filename)
{
location = cbcsrvname + "/Annotations/home.html";
}

function oldtestLocalSrvAnnot(filename)
{
var old_msg = eval("msg1_" + filename);

var msg = '\nThe "Genome Annotations" can be accessed only by\nusing the IBM Computational Biology Center' + "'" + 's servers.\n\nDo you want to continue to this site?';

// if (srvname.substr(0, cbcsrvname.length) != cbcsrvname)
if (rootdir.substr(0, cbcsrvname.length) != cbcsrvname)
	{
	// if [old_msg] or [old_msg + "one space"] the user has not answered yes to going to Annotation/home on cbcsrv

	if ((document.server.banner.value == old_msg) || (document.server.banner.value == (old_msg + " ")))
		{
		if (confirm(msg))
			{
			document.server.banner.value = document.server.banner.value + "  ";

			location = cbcsrvname + "/Annotations/home.html";
			}
		}
	else	{
		location = cbcsrvname + "/Annotations/home.html";
		}
	}
else	{
	location = cbcsrvname + "/Annotations/home.html";
	}
}