function setFontStyleSheet(PERKINS_FONT_CSS_TITLE) {
	var i, a;
	for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {
		if(a.className == "fontcss" && a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title")) {
			a.disabled = true;
			if(a.getAttribute("title") == PERKINS_FONT_CSS_TITLE) a.disabled = false;
		}
	}
}

function getFontStyleSheet() {
  var i, a;
  for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {
    if(a.className == "fontcss" && a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title") && !a.disabled) {
    	return a.getAttribute("title");
    	}
  }
  return null;
}


function setThemeStyleSheet(PERKINS_THEME_CSS_TITLE) {
	var i, a;
	for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {
		if(a.className == "themecss" && a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title")) {
			a.disabled = true;
			if(a.getAttribute("title") == PERKINS_THEME_CSS_TITLE) a.disabled = false;
		}
	}
}

function getThemeStyleSheet() {
  var i, a;
  for(i=0; (a = document.getElementsByTagName("link")[i]); i++) {
    if(a.className == "themecss" && a.getAttribute("rel").indexOf("style") != -1 && a.getAttribute("title") && !a.disabled) {
    	return a.getAttribute("title");
    	}
  }
  return null;
}



// COOKIE SET
window.onunload = function(e) {
	// Font Cookie
  if (getFontStyleSheet() != null) {
  	if (getFontStyleSheet() != PERKINS_FONT_COOKIE) {
	  	WM_setCookie(PERKINS_FONT_COOKIE_NAME, getFontStyleSheet(), 24*31, PERKINS_COOKIE_PATH, PERKINS_COOKIE_DOMAIN, '');
	}
  } else {
  	WM_killCookie(PERKINS_FONT_COOKIE_NAME, PERKINS_COOKIE_PATH, PERKINS_COOKIE_DOMAIN );
  }

	// Theme Cookie
  if (getThemeStyleSheet() != null) {
  	if (getThemeStyleSheet() != PERKINS_THEME_COOKIE) {
	  	WM_setCookie(PERKINS_THEME_COOKIE_NAME, getThemeStyleSheet(), 24*31, PERKINS_COOKIE_PATH, PERKINS_COOKIE_DOMAIN, '');
	}
  } else {
  	WM_killCookie(PERKINS_THEME_COOKIE_NAME, PERKINS_COOKIE_PATH, PERKINS_COOKIE_DOMAIN );
  }
}

// removed some window.onload functions that didn't seem relevant

setFontStyleSheet(PERKINS_FONT_CSS_TITLE);
setThemeStyleSheet(PERKINS_THEME_CSS_TITLE);