
/* ----- aqtree3clickable.js ----- */
// http://www.animalbehavior.org/ABSHandbook/portal_javascripts/aqtree3clickable.js?original=1
Javascript that expands and collapses Zwiki's subtopic lists.
addEvent(window,"load",init_uls);
function addEvent(obj,evType,fn){if(obj.addEventListener){obj.addEventListener(evType,fn,true);return true} else if(obj.attachEvent){var r=obj.attachEvent("on"+evType,fn);return r} else{return false}}
function init_uls(){var uls=document.getElementsByTagName("ul");var n_uls=uls.length;for(var i=0;i<n_uls;i++){var ul=uls[i];if(ul.className=="aqtree3clickable"&&(ul.parentNode.nodeName!="SMALL")){init_ul(ul)}}}
function init_ul(ul){var children=ul.childNodes;var n_cn=children.length;for(var i=0;i<n_cn;i++){ch=children[i];if(ch.nodeType==1){if(ch.nodeName=="LI"){init_li(ch)}
else{alert(ch.nodeName);return(0)}}}}
function get_sibling_with_name(elem,name){siblings=elem.parentNode.childNodes;for(i=0;i<siblings.length;i++){if(siblings[i].nodeName==name){return siblings[i]}}}
function get_child_with_name(elem,name){children=elem.childNodes;for(i=0;i<children.length;i++){if(children[i].nodeName==name){return children[i]}}}
function has_child_with_name(elem,name){children=elem.childNodes;for(i=0;i<children.length;i++){if(children[i].nodeName==name){return true}}
return false}
function expand_li_IE(){var img=window.event.srcElement;expand_li(img)}
function expand_li(img){img.setAttribute('src','minus.gif');if(img.attachEvent){img.detachEvent("onclick",expand_li_IE);img.attachEvent("onclick",collapse_li_IE)}
else{img.setAttribute('onClick','collapse_li(this)')}
var li=img.parentNode;li.className='open';var ul=get_sibling_with_name(img,'UL');init_ul(ul)}
function collapse_li_IE(){var img=window.event.srcElement;collapse_li(img)}
function collapse_li(img){li=img.parentNode;li.className="closed";img.setAttribute('src','plus.gif');if(img.attachEvent){img.detachEvent("onclick",collapse_li_IE);img.attachEvent("onclick",expand_li_IE)}
else{img.setAttribute('onClick',"expand_li(this)")}}
function init_li(li){if(!has_child_with_name(li,'IMG')){var img=document.createElement('IMG');if(has_child_with_name(li,'UL')){img.setAttribute('src','plus.gif');if(img.attachEvent){img.detachEvent("onclick",collapse_li_IE);img.attachEvent("onclick",expand_li_IE)}
else{img.setAttribute('onClick',"expand_li(this)")}
li.className="closed"}
else{img.setAttribute('src','bullet.gif');li.className="bullet"}
li.insertBefore(img,li.firstChild)}
else{var img=get_child_with_name(li,'IMG');if(img.className=='closed'){expand_li(img)}}}

