/* --- Made by Frederico Figueiredo --- */

//Contacts - BY FEPF (13.10.2003)
ar = "@"
itContacts=0;

contacts = new Array();
contacts[itContacts++] = new Array("JJ", "Joaquim Jorge", "Joaquim.Jorge", "inesc-id.pt");
contacts[itContacts++] = new Array("FF", "Frederico Figueiredo", "Frederico.Figueiredo", "inesc-id.pt");
contacts[itContacts++] = new Array("SA", "Sónia Assunção", "saa", "immi.inesc-id.pt");
contacts[itContacts++] = new Array("RS", "Rhonda Schauer", "rhondajschauer", "earthlink.net");
contacts[itContacts++] = new Array("DE", "Dena Eber", "deber", "bgnet.bgsu.edu");
contacts[itContacts++] = new Array("FH", "Frank Hanisch", "fhanisch", "gris.uni-tuebingen.de");
contacts[itContacts] = new Array("ED", "Editor-in-Chief", "editor", "rtr.inesc-id.pt");

//Recebe:
//name: Nome a indexar na primeira coluna do Array de contactos
//presentation: 0 -> neste caso escreve directamente o email; 1 -> Escreve o nome do contacto
//writeTo: 0 -> Faz um document.write do resultado; 1 -> Retorna uma string com o resultado 2 -> retorna
//		   apenas a parte do href
//subject: subject do email
function MailTo(name, presentation, writeTo, subject) {
	var result = "No email Available";

	var m = "mail";
	var t = "to";
	var p = ":";
	var it = "?";
	var sj = "subject";
	var e = "=";
	var subjDefault = "CGEMS Project";
	var href = "";

	for(var i=0; i<=itContacts; i++) {
		if(contacts[i][0] == name) {
			var mail = contacts[i][2]+ar+contacts[i][3];
			var name;
			if(presentation == 0)
				name = mail;
			else
				name = contacts[i][1];
			if(subject != null)
				if(subject != null)
					subjDefault = subject;
			href = "href='"+m+t+p+contacts[i][2]+ar+contacts[i][3]+it+sj+e+subjDefault+"' onMouseOver='window.status=\"Send an Email to "+contacts[i][1]+"\";return true;' onMouseOut='window.status=\"\";'"+"'";
			result = "<a "+href+">"+name+"</a>";
		}
	}
	if(writeTo == 0) {
		document.write(result);
		return;
	}
	else
		if(writeTo == 1)
			return result;
		else
			if(writeTo == 2)
				return href;
}