// Universal Related Select Menus - cascading popdown menus
// by Andrew King. v1.34 19990720
// Copyright (c) 1999 internet.com LLC. All Rights Reserved.
//
// Originally published and documented at http://www.webreference.com
// Contact aking@internet.com for all other uses.

if(v){a=new Array(56);}

function getFormNum (formName) {
	var formNum =-1;
	for (i=0;i<document.forms.length;i++){
		tempForm = document.forms[i];
		if (formName == tempForm) {
			formNum = i;
			break;
		}
	}
	return formNum;
}

function jmp(form, elt)
// The first parameter is a reference to the form.
{
	if (form != null) {
		with (form.elements[elt]) {
			if (0 <= selectedIndex)
				location = options[selectedIndex].value;
		}
	}
}

var catsIndex = -1;
var itemsIndex;

if (v) { // ns 2 fix
function newCat(){
	catsIndex++;
	a[catsIndex] = new Array();
	itemsIndex = 0;
}

function O(txt,url) {
	a[catsIndex][itemsIndex]=new myOptions(txt,url);
	itemsIndex++;
}

function myOptions(text,value){
	this.text = text;
	this.value = value;
}

// fill array

newCat();
O("Colonies - select a topic:","#");
O("Introduction: Colonies","/Colonies/");
O("Algeria","/Colonies/Algeria.shtml");
O("Cameroon","/Colonies/Cameroon.shtml");
O("Chad","/Colonies/Eq_Africa.shtml#Chad");
O("Comoros","/Colonies/Comoros.shtml");
O("Cote d'Ivoire","/Colonies/Cote_d_Ivoire.shtml");
O("Crozet Islands","/Colonies/Crozet.shtml");
O("Dahomey (Benin)","/Colonies/Benin.shtml");
O("French Equatorial Africa","/Colonies/Eq_Africa.shtml");
O("French Guiana","/Colonies/Guiana.shtml");
O("French Guinea (Guinea)","/Colonies/Guinea.shtml");
O("French Polynesia","/Colonies/Polynesia.shtml");
O("French Somaliland (Djibouti)","/Colonies/Djibouti.shtml");
O("French Sudan (Mali)","/Colonies/Mali.shtml");
O("French West Africa","/Colonies/West_Africa.shtml");
O("Gabon","/Colonies/Gabon.shtml");
O("Guadeloupe","/Colonies/Guadeloupe.shtml");
O("Haiti","/Colonies/Haiti.shtml");
O("Indochina","/Colonies/Indochina.shtml");
O("Kerguelen Islands","/Colonies/Kerguelen.shtml");
O("Louisiana","/Colonies/Louisiana.shtml");
O("Madagascar","/Colonies/Madagascar.shtml");
O("Martinique","/Colonies/Martinique.shtml");
O("Mauritania","/Colonies/Mauritania.shtml");
O("Mayotte","/Colonies/Mayotte.shtml");
O("Middle Congo (Congo)","/Colonies/Congo.shtml");
O("Montserrat","/Colonies/Montserrat.shtml");
O("Morocco","/Colonies/Morocco.shtml");
O("New Caledonia","/Colonies/New_Caledonia.shtml");
O("New France (Canada)","/Colonies/Canada.shtml");
O("New Hebrides (Vanuatu)","/Colonies/Vanuatu.shtml");
O("Niger","/Colonies/Niger.shtml");
O("Pondicherry","/Colonies/Pondicherry.shtml");
O("Reunion","/Colonies/Reunion.shtml");
O("Rodrigues","/Colonies/Rodrigues.shtml");
O("Senegal","/Colonies/Senegal.shtml");
O("Seychelles","/Colonies/Seychelles.shtml");
O("Southern & Antarctic Territories","/Colonies/Antarctic.shtml");
O("St. Barthelemy","/Colonies/Guadeloupe2.shtml#St-Barts");
O("St. Martin","/Colonies/Guadeloupe2.shtml#St-Martin");
O("St. Paul & Amsterdam","/Colonies/St-Paul_Amsterdam.shtml");
O("St. Pierre & Miquelon","/Colonies/St-Pierre_Miquelon.shtml");
O("Terre Adelie","/Colonies/Terre_Adelie.shtml");
O("Togo","/Colonies/Togo.shtml");
O("Tunisia","/Colonies/Tunisia.shtml");
O("Ubangi-Shari (Central Afr. Rep.)","/Colonies/Centr_Afr_Rep.shtml");
O("Upper Volta (Burkina Faso)","/Colonies/Burkina_Faso.shtml");
O("Wallis & Futuna Islands","/Colonies/Wallis_Futuna.shtml");
O("Other Former Colonies","/Colonies/Other_Colonies.shtml");
O("--------------------------------------","/Colonies/");
O("Books & Maps","/Boutique/Books/");
O("Boutique","/Boutique/");
O("Travel Services","http://travelcenter.discoverfrance.net/");
O("--------------------------------------","/Colonies/");
O("Site Map","/France/DF_sitemap1.shtml");

newCat();
O("France - select a topic:","#");
O("Welcome to France","/France/index2.shtml");
O("Academic Research","/France/Academics/DF_research.shtml");
O("Add Your Site","/France/Webring/DF_ringintro.shtml");
O("Advertising","/France/Advertising/adv_intro.shtml");
O("Art & Architecture","/France/Art/DF_art.shtml");
O("Ask the Experts","/France/DF_experts.shtml");
O("Awards","/France/DF_awards.shtml");
O("Books & Maps","/Boutique/Books/");
O("Boutique","/Boutique/");
O("Children","/France/DF_children.shtml");
O("Climate","/France/DF_climate.shtml");
O("Communications","/France/DF_communications.shtml");
O("Consulate Info","/France/consulate_info.shtml");
O("Copyrights","/France/DF_copyrights.shtml");
O("Cuisine","/France/Food/DF_cuisine.shtml");
O("Dictionaries","/France/Language/DF_dictionaries.shtml");
O("Economy","/France/DF_economy.shtml");
O("Education","/France/Education/DF_education.shtml");
O("Facts & Figures","/France/fact_sheet.shtml");
O("Feature Articles","/France/DF_features.shtml");
O("Flora & Fauna","/France/DF_florafauna.shtml");
O("Free Stuff","/France/DF_freebies.shtml");
O("Government","/France/DF_govt.shtml");
O("Health","/France/DF_healthcare.shtml");
O("History","/France/History/DF_history.shtml");
O("Holidays","/France/DF_holidays.shtml");
O("Land & Topography","/France/DF_topography.shtml");
O("Language","/France/Language/DF_language.shtml");
O("Literature","/France/Literature/DF_literature.shtml");
O("Lodging","/France/DF_lodging.shtml");
O("Maps of France & Paris","/France/DF_maps.shtml");
O("Movies","/France/Movies/mov_index.shtml");
O("Museums","/France/DF_museums.shtml");
O("Music","/France/DF_music.shtml");
O("News Articles","/France/News/DF_newstoc.shtml");
O("People","/France/DF_people.shtml");
O("Postal Services","/France/DF_postal.shtml");
O("Print Media","/France/DF_media-prt.shtml");
O("Radio & TV","/France/DF_media-bc.shtml");
O("Resources","/France/DF_resources.shtml");
O("Science","/France/Science/DF_science.shtml");
O("Sports & Recreation","/France/Sports/DF_sports.shtml");
O("Study Abroad","/France/Academics/DF_abroad.shtml");
O("Theatre","/France/Theatre/DF_theatre.shtml");
O("Tourism","/France/DF_tourism.shtml");
O("Transportation","/France/DF_transport.shtml");
O("Travelogues, Anecdotes","/France/DF_features.shtml");
O("Travel Services","http://travelcenter.discoverfrance.net/");
O("Videos","/Boutique/Movies/");
O("Waterways","/France/DF_waterways.shtml");
O("Weights & Measures","/France/Measures/DF_measures.shtml");
O("Wines","/France/Wine/DF_wines.shtml");
O("Other Links","/France/DF_links.shtml");
O("--------------------------------------","/France/");
O("Site Map","/France/DF_sitemap1.shtml");

newCat();
O("Paris - select a topic:","#");
O("Introduction to Paris","/France/Paris/");
O("Airports (CDG, Orly)","/France/Transportation/Air/airports_Paris1.shtml");
O("Alternate Lifestyles","/France/Paris/Paris_bigayles.shtml");
O("Arts & Entertainment","/France/Paris/Paris_entertainment.shtml");
O("Bateaux-Mouches (river & canal cruises)","/France/Transportation/Water/Bateaux-Mouches.shtml");
O("Climate","/France/Paris/Paris_climate.shtml");
O("Economy","/France/Paris/Paris_intro.shtml#Economy");
O("Government","/France/Paris/Paris_intro.shtml#Government");
O("History","/France/Paris/Paris_history.shtml");
O("Landmarks & Monuments","/France/Paris/Paris_monuments.shtml");
O("Lodging","/France/Paris/Paris_lodging.shtml");
O("Maps","/France/Paris/Paris_maps.shtml");
O("Metro (subway & commuter rail)","/France/Paris/Paris_metro.shtml");
O("Museums & Galleries","/France/Paris/Paris_museums.shtml");
O("Opera & Dance","/France/Paris/Paris_opera.shtml");
O("Parks & Gardens","/France/Paris/Paris_parks.shtml");
O("Restaurants","/France/Paris/Paris_rest.shtml");
O("Shopping","/France/Paris/Paris_shopping.shtml");
O("Theatre & Cabarets","/France/Paris/Paris_theatre.shtml");
O("Transportation","/France/Paris/Paris_intro.shtml#Transportation");
O("--------------------------------------","/France/Paris/");
O("Books & Maps","/Boutique/Books/");
O("Boutique","/Boutique/");
O("Feature Article","/France/Paris/Paris_Hemingway1.shtml");
O("Free Stuff","/France/DF_freebies.shtml");
O("Travel Services","http://travelcenter.discoverfrance.net/");
O("--------------------------------------","/France/Paris/");
O("Site Map","/France/DF_sitemap1.shtml");

newCat();
O("Provinces - select a topic:","#");
O("Introduction: Provinces","/France/Provinces/prov_intro.shtml");
O("Alsace","/France/Provinces/Alsace-Lorraine.shtml");
O("Aquitaine","/France/Provinces/Aquitaine.shtml");
O("Auvergne","/France/Provinces/Auvergne.shtml");
O("Brittany","/France/Provinces/Brittany.shtml");
O("Burgundy","/France/Provinces/Burgundy.shtml");
O("Centre-Val de Loire","/France/Provinces/Centre.shtml");
O("Champagne-Ardenne","/France/Provinces/Champagne.shtml");
O("Corsica","/France/Provinces/Corsica.shtml");
O("Franche-Comte","/France/Provinces/Franche-Comte.shtml");
O("Ile-de-France","/France/Provinces/Ile-de-France.shtml");
O("Languedoc-Roussillon","/France/Provinces/Languedoc.shtml");
O("Limousin","/France/Provinces/Limousin.shtml");
O("Lorraine","/France/Provinces/Alsace-Lorraine.shtml");
O("Midi-Pyrenees","/France/Provinces/Midi-Pyrenees.shtml");
O("Nord-Pas-de-Calais","/France/Provinces/Nord.shtml");
O("Normandy","/France/Provinces/Normandy.shtml");
O("Pays de la Loire","/France/Provinces/Pays-Loire.shtml");
O("Picardy","/France/Provinces/Picardy.shtml");
O("Poitou-Charentes","/France/Provinces/Poitou-Charentes.shtml");
O("Provence","/France/Provinces/Provence.shtml");
O("Rhone-Alpes","/France/Provinces/Rhone-Alpes.shtml");
O("--------------------------------------","/France/Provinces/");
O("Books & Maps","/Boutique/Books/");
O("Boutique","/Boutique/");
O("Feature Article","/France/Features/Nostradamus.shtml");
O("Free Stuff","/France/DF_freebies.shtml");
O("Travel Services","http://travelcenter.discoverfrance.net/");
O("--------------------------------------","/France/Provinces/");
O("Site Map","/France/DF_sitemap1.shtml");
} // if (v)

function relate(formName,elementNum,j) {
if(v){
var formNum = getFormNum(formName);
 if (formNum>=0) {
	formNum++; // reference next form, assume it follows in HTML
	with (document.forms[formNum].elements[elementNum]) {
		for(i=options.length-1;i>0;i--) options[i] = null; // null out in reverse order (bug workarnd)
		for(i=0;i<a[j].length;i++){
			options[i] = new Option(a[j][i].text,a[j][i].value); 
		}
		options[0].selected = true;
	}
 }
} else {
jmp(formName,elementNum);
}
}

// BACK BUTTON FIX for ie4+
// added ie5 persistence 990714

function IEsetup(){
	if(!document.all) return;
	IE5 = navigator.appVersion.indexOf("5.")!=-1;
	if(!IE5) {
		for (i=0;i<document.forms.length;i++) {
			document.forms[i].reset();
		}
	}
}

window.onload = IEsetup;