// javascripts by ele, Switzerland
// foldable menu for DOM browsers
// public domain

var selfCollapse = true;    // change to false to disable self collapsing folders
var containerID = "navi";   // change this if your container with the navigational elements has a different id
var submenuTag = "div";     // change this if you use a different tag for the submenu (e.g. "ul")
var first = true;
var submenu, prevMenu, prevFolder;
var notIE = (navigator.appName != "Microsoft Internet Explorer") ? true : false;
var regE = new RegExp();
regE.compile (".*\/(.*\.html?)");

function show_hide(folder)
{
	submenu = folder.parentNode.nextSibling;
	if (notIE) submenu = submenu.nextSibling;
	if (submenu.style.display == 'none')
	{
		if (selfCollapse == true && first == false)
		{	prevMenu.style.display = 'none';
			prevFolder.style.fontStyle = 'normal';
		}
		submenu.style.display = 'block';
		folder.style.fontStyle = 'italic';
		prevFolder = folder;
		prevMenu = submenu;
	}
	else
	{	submenu.style.display = 'none';
		folder.style.fontStyle = 'normal';
	}
	first = false;
}

// init_page will do the following:
// 1. check browser for DOM capability
// 2. if so, hide each submenu unless it contains a link to the loaded page

function init_page(tip)
{
	var subelement,inc;
	if (document.getElementsByTagName)  // see above 1.
	{	var href = regE.exec(location.pathname)
		href = (!href)? undefined : href[1];
		var subcount = document.getElementsByTagName(submenuTag).length;
		for (var i = 0; i < subcount; i++)
		{	subelement = document.getElementsByTagName(submenuTag)[i];
			if (subelement.className == "submenu")
			{ 	var childcount = subelement.childNodes.length;
				if (notIE) inc = 2;
				else inc = 1;
				for (var j=inc-1; j < childcount; j+=inc)
				{	if (href == regE.exec(subelement.childNodes[j].firstChild.href)[1]) break; }
				if (j == childcount) subelement.style.display = "none";  // see above 2.
				else
				{	var folder = subelement.previousSibling;
					if (notIE) folder = folder.previousSibling;
					folder.style.fontStyle = "italic";
					prevFolder = folder;
					prevMenu = subelement;
					first = false;
				}
			}
		}
	}
	do_siteSpecific(tip);
}

// the following code is site specific and not part of the foldable menu!

function do_siteSpecific(tip)
{
	if (window.location.hash != "") scroll(0,-100,80);  // corrects position error if top elements with "position:fixed" are used
	switch (tip)
	{	case "kultur"   : get_kulturTip(); break;
		case "info"     : get_infoTip(); break;
		case "wallfahrt": get_wallfahrtsTip();
	}
}

function scroll(x,y,t)
{
	t = (!t)? 10 : t;
	setTimeout('window.scrollBy('+x+','+y+')',t);
}

function highlight(elem)
{	if (elem.style.textDecoration == "underline") elem.style.textDecoration = "none";
 	else elem.style.textDecoration = "underline";
}

var warning = new Array ();
	warning["de"] = "Ungültiger Suchbegriff!";
	warning["en"] = "Invalid search term!";
var iframe = new Array();
	iframe["de"] = "results-de";
	iframe["en"] = "results-en";

var notImplemented = new Array()
	notImplemented["de"] = "Die Suchfunktion steht zur Zeit noch nicht zur Verfügung!";
	notImplemented["en"] = "The search function is not yet implemented!";

function check_andSend(val,lang)
{
	alert(notImplemented[lang]);
}

/*function check_andSend(lang)
{
	<form class="search" name="thunderstone" target="content" method="get" action="http://diorama.ch.master.com/texis/master/search/opendir.html">
		<input type="text" name="q" value="" maxlength="255" />
		<span style="cursor:pointer;" onmouseover="highlight(this)" onmouseout="highlight(this)" onclick="check_andSend('de')">suchen</span>
	</form>

	if(document.thunderstone.q.value.length < 3 )
 	{ 	alert(warning [lang]);
   		document.thunderstone.q.focus();
     	return false;
 	}
	else
	{	//alert(iframe[lang]);
		//document.getElementById("content").innerHTML = '<iframe src="" name="'+iframe[lang]+'"></iframe>';
		<input type="hidden" name="rdfreq" value="1000" />
				<input type="hidden" name="rlead" value="0" />
				<input type="hidden" name="sufs" value="2" />
				<input type="hidden" name="l" value="gr" />

		http://diorama.ch.master.com/texis/master/search/opendir.html?q=einsiedeln&rdfreq=1000&rlead=0&sufs=2&l=gr

		document.thunderstone.submit();
		}
}
http://diorama.ch.master.com/texis/master/search/mysite.html
*/
// code for date of webpage

function open_imp(href)
{
	window.open(href,'Impressum','width=330,height=450,left=100,top=200,resizable=no,dependent=yes');
}