if(top.location != self.location) top.location = self.location;

function addToFavorite(favWeb,favTitle){
	if((navigator.appVersion.indexOf("MSIE") > 0) && (parseInt(navigator.appVersion) >= 4)){
		window.external.AddFavorite(favWeb, unescape(favTitle));
	}
}

function setHomePage(homepage,la_url_es){
	var agt=navigator.userAgent.toLowerCase();
	var is_major = parseInt(navigator.appVersion);
	var is_minor = parseFloat(navigator.appVersion);
	var is_nav = ((agt.indexOf('mozilla')!=-1) && (agt.indexOf('spoofer')==-1) && (agt.indexOf('compatible') == -1) && (agt.indexOf('opera')==-1) && (agt.indexOf('webtv')==-1) && (agt.indexOf('hotjava')==-1));
	var is_ie = ((agt.indexOf("msie") != -1) && (agt.indexOf("opera") == -1));
	var is_ie3 = (is_ie && (is_major < 4));
	var is_ie4 = (is_ie && (is_major == 4) && (agt.indexOf("msie 5")==-1) );
	var is_ie4 = (is_ie && (is_major == 4) && (agt.indexOf("msie 5")==-1) && (agt.indexOf("msie 6")==-1));
	var is_ie5up = (is_ie && !is_ie3 && !is_ie4);
	var is_win = ( (agt.indexOf("win")!=-1) || (agt.indexOf("16bit")!=-1) );
	if (is_win && is_ie5up){
		oHomePage.style.behavior='url(#default#homepage)';
		oHomePage.setHomePage(homepage);
	}
}

//funciones boletín
function comprueba(f){
	var mail = f.mail.value;
	var pasa = true;
	if(mail.indexOf(' ')!=-1) pasa = false;
	if(mail.indexOf('@') == -1) pasa = false;
	if(mail.indexOf('.') == -1) pasa = false;
	if(pasa){
		pos_arroba = mail.indexOf('@');
		nombre = mail.substring(0,pos_arroba);
		dominio = mail.substring(pos_arroba+1);
		if(nombre.length == 0) pasa = false;
		if(nombre == '.') pasa = false;
		if(dominio.length == 0) pasa = false;
		if(dominio.indexOf('.') == -1) pasa = false;
		len_dom = dominio.length - 1;
		if ((dominio.charAt(0) == '.')||(dominio.charAt(len_dom) == '.')) pasa = false;
		if(!charCorrectos(nombre)) pasa = false;
		if(!charCorrectos(dominio)) pasa = false;
	}
	if(!pasa) alert('El mail introducido no es válido');
	return pasa;
}

function charCorrectos(cadena){
	pasa = true;
	validos='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_.';
	for(i=0;i<cadena.length;i++){
		if (validos.indexOf(cadena.charAt(i))==-1){
			pasa = false;
		}
		if(cadena.charAt(i)=='.'){
			if((i!=cadena.length-1) && (cadena.charAt(i+1)=='.')){
				pasa = false;
			}
		}
	}
	return pasa;
}

function compruebaq(f){
	pasa = true;
	if(f.q.value.length == 0){
		alert('Introduce una palabra o frase clave para buscar');
		pasa = false;
	}
	return pasa;
}