//This should not go on the live box - remove it if found there!
 function AddSnowballOptions() 
 {
	//only run on internal server
	if (! ((location.hostname == 'derby') || (location.hostname == 'stoke') ))
		return false;
	
	//Add on an option box for snowball users
	var bodyRoot = document.getElementsByTagName('body')[0];
	
	//Container
	var snowballOptionBox = document.createElement("p");
	snowballOptionBox.setAttribute('className', '');
	snowballOptionBox.className = 'snowballOptionBox';
	var snowballOptionBoxText = document.createTextNode('Snowball user options:');
	snowballOptionBox.appendChild(snowballOptionBoxText);

	var currentPage = location.pathname;//the page we are on, root relative
	
	//Option list
	var snowballOptions = document.createElement('ul');
	
	//Edit link 
	var snowballOption1 = document.createElement('li');
	var snowballLink1 = document.createElement('a');
	snowballLink1.href = 'snowball:pageEdit:' + currentPage;
	snowballLink1.appendChild(document.createTextNode("Edit this page"));
	snowballOption1.appendChild(snowballLink1);
	
	/*Add child link
	var snowballOption2 = document.createElement('li');
	var snowballLink2 = document.createElement('a');
	snowballLink2.href = 'snowball:pageAddChild:' + currentPage;
	snowballLink2.appendChild(document.createTextNode('Add a child page'));
	snowballOption2.appendChild(snowballLink2);
	*/
	//tie them together
	snowballOptions.appendChild(snowballOption1);
	//snowballOptions.appendChild(snowballOption2);
	snowballOptionBox.appendChild(snowballOptions);

	bodyRoot.appendChild(snowballOptionBox);
}
//addLoadListener(AddSnowballOptions);