// http://wiki.mintel.co.uk/index.php/GNPD/JavaScript_loading
var cached=""
$A(document.getElementsByTagName("script")).findAll( function(s) {
    return (s.src && s.src.match(/js\/loader\.\d+\.js$/))
}).each( function(s) {
  m=s.src.match(/\.(\d+)\./)
  if (m) cached=m[1]
});
var jsloaded=[];
function jsload(s) {
  if (jsloaded.indexOf(s)>-1)
      return;
  jsloaded.push(s);
  var fn = (s.startsWith("http://")) ? s : s+"."+cached+".js"
  if (document.loaded)
  {
    var sEl = document.createElement('script')
    sEl.src = fn;
    document.documentElement.firstChild.appendChild(sEl);
  }
  else 
  {
    document.write('<script src="'+fn+'"><\/script>')
  }
}
var cssloaded=[];
function cssload(s) {
  if (cssloaded.indexOf(s)>-1)
      return;
  var ssEl = document.createElement('link')
  ssEl.href = (s.startsWith("http://")) ? s : s+"."+cached+".css"
  ssEl.rel = 'stylesheet';
  document.documentElement.firstChild.appendChild(ssEl);
}
function jspreload(s, c) {
    if (!c)
        c= 0;
    if (Ajax.activeRequestCount == 0 && document.loaded)
        jsload.defer(s)
    else (c<5)
        jspreload.delay(0.5, s, c+1)
}
function csspreload(s, c) {
    if (!c)
        c= 0;
    if (Ajax.activeRequestCount == 0 && document.loaded)
        cssload.defer(s)
    else if (c<5)
        csspreload.delay(0.5, s, c+1)
}
if (typeof GNPD=='undefined') {
  [ "/gnpd/js/shadedborder", "/gnpd/js/utilities",
    "/gnpd/sidebar","/gnpd/js/jsolait/hooks", "/gnpd/js/commandlets",
    "/gnpd/js/look_and_feel", "/gnpd/calendar", "/gnpd/js/results_list"].each(function(s){jsload(s)})
}
if ((document.styleSheets[0].cssRules && document.styleSheets[0].cssRules.length==0)
     || (document.styleSheets[0].rules && document.styleSheets[0].rules.length==0)) {
  ["/gnpd/stylesheet", "/gnpd/global", "/gnpd/calendar", "/gnpd/css/results_list"].each(function(s){cssload(s)})
}