function sl_switch(w) {
	switch (w) {
		case 'empty' : // to empty the window.status
			wlocation = ' ';
			break;
			
		case 'home' :
			wlocation = '/';
			break;
			
		case 'forum':
			wlocation = '/forum';
			break;
			
		case 'wiki':
			wlocation = '/wiki/fr/documentation';
			break;
			
		case 'association' :
			wlocation = '/wiki/en/association';
			break;
			
		case 'irc' :
			wlocation = 'http://www.swisslinux.org';
			break;
			
		case 'jabber' :
			wlocation = '/wiki/fr/documentation/jabber';
			break;

		case 'rss' :
			wlocation = 'http://www.swisslinux.org';
			break;
		
		case 'mailing' :
			wlocation = '/lists/';
			break;

		case 'press' :
			wlocation = '/blog/';
			break;

		default :
			wlocation = '/';
		}
		
	return wlocation;
	}

function sl_goto(w) { // warning "goto()" is a reserved function of opera
	location = sl_switch(w);
	}

function sl_info(w) {
	window.status = sl_switch(w);
	return true;
	}