//
// Copyright (c) 2006 by Conor O'Mahony.
// For enquiries, please email GubuSoft@GubuSoft.com.
// Please keep all copyright notices below.
// Original author of TreeView script is Marcelino Martins.
//
// This document includes the TreeView script.
// The TreeView script can be found at http://www.TreeView.net.
// The script is Copyright (c) 2006 by Conor O'Mahony.
//
// You can find general instructions for this file at www.treeview.net.
//

USETEXTLINKS = 1
STARTALLOPEN = 0
USEFRAMES = 0
USEICONS = 0
WRAPTEXT = 1
PRESERVESTATE = 1

//
// The following code constructs the tree.  This code produces a tree that looks like:
// 
// Tree Options
//  - Expand for example with pics and flags
//    - United States
//      - Boston
//      - Tiny pic of New York City
//      - Washington
//    - Europe
//      - London
//      - Lisbon
//  - Types of node
//    - Expandable with link
//      - London
//    - Expandable without link
//      - NYC
//    - Opens in new window
//

foldersTree = gFld("<b>Home</b>", "http://www.muntons.com")
  foldersTree.treeID = "Frameless"
aux1 = insFld(foldersTree, gFld("Home Beer Kits", "javascript:undefined"))
    aux2 = insFld(aux1, gFld("UK", "http://www.muntons.com/homebeer/countries/UK/default.asp"))
    aux2 = insFld(aux1, gFld("Italy", "http://www.muntons.com/homebeer/countries/italy/default.asp"))
	aux2 = insFld(aux1, gFld("Spain", "http://www.muntons.com/homebeer/countries/spain/default.asp"))
	aux2 = insFld(aux1, gFld("Germany", "http://www.muntons.com/homebeer/countries/germany/default.asp"))
	aux2 = insFld(aux1, gFld("Finland", "http://www.muntons.com/homebeer/countries/finland/default.asp"))
	aux2 = insFld(aux1, gFld("Sweden", "http://www.muntons.com/homebeer/countries/sweden/default.asp"))
	aux2 = insFld(aux1, gFld("Norway", "http://www.muntons.com/homebeer/countries/norway/default.asp"))
	aux2 = insFld(aux1, gFld("USA", "http://www.muntons.com/homebeer/countries/USA/default.asp"))
	aux2 = insFld(aux1, gFld("English Canadian", "http://www.muntons.com/homebeer/countries/canada_usa/default.asp"))
	aux2 = insFld(aux1, gFld("French Canadian", "http://www.muntons.com/homebeer/countries/canada_french/default.asp"))
	aux2 = insFld(aux1, gFld("Australia", "http://www.muntons.com/homebeer/countries/australia/default.asp"))
	aux2 = insFld(aux1, gFld("New Zealand", "http://www.muntons.com/homebeer/countries/newzealand/default.asp"))
	
aux1 = insFld(foldersTree, gFld("Distributors", "http://www.muntons.com/homebeer/agents/default.asp"))
aux1 = insFld(foldersTree, gFld("Other Products", "http://www.muntons.com/homebeer/htm/other_products.asp"))
aux1 = insFld(foldersTree, gFld("Merchandise", "http://www.muntons.com/homebeer/merchandise/default.asp"))
aux1 = insFld(foldersTree, gFld("Quiz Linda", "http://www.muntons.com/homebeer/htm/ask_andy.asp"))
aux1 = insFld(foldersTree, gFld("Meet the team", "http://www.muntons.com/homebeer/htm/meet_the_team.asp"))
aux1 = insFld(foldersTree, gFld("Product Availability", "http://www.muntons.com/homebeer/htm/one2brew.asp"))
aux1 = insFld(foldersTree, gFld("Useful links", "http://www.muntons.com/homebeer/htm/useful_links.asp"))
aux1 = insFld(foldersTree, gFld("Retailer resources", "http://www.muntons.com/homebeer/htm/retailer_resources.asp"))
aux1 = insFld(foldersTree, gFld("Contact", "http://www.muntons.com/contact/homebeer.asp"))


aux1 = insFld(foldersTree, gFld("Other Divisions", "javascript:undefined"))
    aux2 = insFld(aux1, gFld("Muntons Malt", "http://www.muntons.com/muntons_malt/default.asp"))
    aux2 = insFld(aux1, gFld("Malted Ingredients", "http://www.muntons.com/mmi/default.asp"))
	
aux1 = insFld(foldersTree, gFld("Home Beer Home", "http://www.muntons.com/homebeer/default.asp"))
aux1 = insFld(foldersTree, gFld("Site Map", "http://www.muntons.com/site_map.asp"))