-/* MarkTree JavaScript code\r
- * \r
- * The contents of this file are subject to the Mozilla Public License Version\r
- * 1.1 (the "License"); you may not use this file except in compliance with\r
- * the License. You may obtain a copy of the License at\r
- * http://www.mozilla.org/MPL/\r
- *\r
- * Software distributed under the License is distributed on an "AS IS" basis,\r
- * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License\r
- * for the specific language governing rights and limitations under the\r
- * License.\r
- * \r
- * Miika Nurminen, 12.7.2004.\r
- */\r
-\r
-/* cross-browser (tested with ie5, mozilla 1 and opera 5) keypress detection */\r
-function get_keycode(evt) {\r
- // IE\r
- code = document.layers ? evt.which\r
- : document.all ? event.keyCode // event.keyCode!=evt.keyCode!\r
- : evt.keyCode;\r
-\r
- if (code==0) \r
- code=evt.which; // for NS\r
- return code;\r
-}\r
-\r
-var lastnode=null;\r
-var listnodes = null;\r
-var list_index=1;\r
-var lastnodetype=''; // determines if node is a link, input or text;\r
-\r
-// up, left, down, right, keypress codes\r
-//ijkl\r
-//var keys = new Array(105,106,107,108);\r
-//num arrows\r
-//var keys = new Array(56,52,50,54);\r
-//wasd\r
-// var press2 = new Array(119,97,115,100);\r
- var press = new Array(47,45,42,43);\r
-\r
-// keydown codes\r
- // var keys2=new Array(87,65,83,68);\r
- var keys= new Array(38,37,40,39);\r
-\r
- // keyset 1 = keydown, otherwise press\r
-function checkup(keyset,n) {\r
- if (keyset==1) return (n==keys[0]);\r
- return ((n==press[0]) /*|| (n==press2[0])*/)\r
-}\r
-\r
-function checkdn(keyset,n) {\r
- if (keyset==1) return (n==keys[2]);\r
- return ((n==press[2]) /*|| (n==press2[2])*/)\r
-}\r
-\r
-function checkl(keyset,n) {\r
- if (keyset==1) return (n==keys[1]);\r
- return ((n==press[1]) /*|| (n==press2[1])*/)\r
-}\r
-\r
-function checkr(keyset,n) {\r
- if (keyset==1) return (n==keys[3]);\r
- return ((n==press[3]) /*|| (n==press2[3])*/)\r
-}\r
-\r
-\r
-\r
-\r
-\r
-function is_exp(n) {\r
- if (n==null) return false;\r
- return ((n.className=='exp') || (n.className=='exp_active'));\r
-}\r
-\r
-function is_col(n) {\r
- if (n==null) return false;\r
- return ((n.className=='col') || (n.className=='col_active'));\r
-}\r
-\r
-function is_basic(n) {\r
- if (n==null) return false;\r
- return ((n.className=='basic') || (n.className=='basic_active'));\r
-}\r
-\r
-\r
-\r
-/* returns i>=0 if true */\r
-function is_active(node) {\r
- if (node.className==null) return false\r
- return node.className.indexOf('_active');\r
-}\r
-\r
-function toggle_class(node) {\r
- if ((node==null) || (node.className==null)) return;\r
- str=node.className;\r
- result="";\r
- i = str.indexOf('_active');\r
- if (i>0)\r
- result= str.substr(0,i);\r
- else\r
- result= str+"_active";\r
- node.className=result; \r
- return node;\r
-}\r
-\r
-function activate(node) {\r
- node.style.backgroundColor='#eeeeff';\r
-}\r
-\r
-function deactivate(node) {\r
- node.style.backgroundColor='#ffffff';\r
-}\r
-\r
-function is_list_node(n) {\r
- if (n==null) return false;\r
- if (n.className==null) return false;\r
- if ( (is_exp(n)) || \r
- (is_col(n)) ||\r
- (is_basic(n)) )\r
- return true; else return false;\r
-}\r
-\r
-\r
-function get_href(n) {\r
- alist=n.attributes;\r
- if (alist!=null) {\r
- hr = alist.getNamedItem('href');\r
- if (hr!=null) return hr.nodeValue;\r
- }\r
- if (n.childNodes.length==0) return '';\r
- for (var i=0; i<n.childNodes.length; i++) {\r
- s = get_href(n.childNodes[i]);\r
- if (s!='') return s;\r
- }\r
- return '';\r
-}\r
-\r
-function get_link(n) {\r
- if (n==null) return null;\r
- if (n.style==null) return null;\r
-\r
- // disabling uncontrolled recursion to prevent error messages on IE\r
- // when trying to focus to invisible links (readonly mode)\r
-// alert(n.nodeName+' '+n.className);\r
- if ((n.nodeName=='UL') && (n.className=='sub')) return null;\r
-\r
- if (n.nodeName=='A') return n;\r
- if (n.childNodes.length==0) return null;\r
- for (var i=0; i<n.childNodes.length; i++) {\r
- s = get_link(n.childNodes[i]);\r
- if (s!=null) return s;\r
- }\r
- return null;\r
-}\r
-\r
-function set_lastnode(n) {\r
-/*var d = new Date();\r
-var t_mil = d.getMilliseconds();*/\r
-// testattu nopeuksia explorerilla, ei merkittäviä eroja\r
- if (lastnode==n) return; \r
-/* deactivate(lastnode)\r
- lastnode=n;\r
- activate(lastnode);*/\r
-\r
- if (is_active(lastnode)>=0)\r
- toggle_class(lastnode);\r
- lastnode=n;\r
- if (!(is_active(lastnode)>=0))\r
- toggle_class(lastnode);\r
-\r
-\r
-/*var d2 = new Date();\r
-var t_mil2 = d2.getMilliseconds();\r
- window.alert(t_mil2-t_mil);*/\r
-}\r
-\r
-function next_list_node() {\r
- tempIndex = list_index;\r
- while (tempIndex<listnodes.length-1) {\r
- tempIndex++;\r
- var x = listnodes[tempIndex];\r
- if (is_list_node(x)) {\r
- list_index=tempIndex;\r
- return;\r
- }\r
- }\r
-}\r
-\r
-function prev_list_node() {\r
- tempIndex = list_index;\r
- while (tempIndex>0) {\r
- tempIndex--;\r
- var x = listnodes[tempIndex];\r
- if (is_list_node(x)) {\r
- list_index=tempIndex;\r
- return;\r
- }\r
- }\r
-}\r
-\r
-\r
-\r
-function getsub (li) {\r
- if (li.childNodes.length==0) return null;\r
- for (var c = 0; c < li.childNodes.length; c++)\r
- if ( (li.childNodes[c].className == 'sub') || (li.childNodes[c].className == 'subexp') ) \r
- return li.childNodes[c];\r
-}\r
-\r
-function find_listnode_recursive (li) {\r
- if (is_list_node(li)) return li; \r
- if (li.childNodes.length==0) return null;\r
- result=null;\r
- for (var c = 0; c < li.childNodes.length; c++) {\r
- result=find_listnode_recursive(li.childNodes[c]);\r
- if (result!=null) return result;\r
- }\r
- return null;\r
-}\r
-\r
-function next_child_listnode(li) {\r
- var result=null;\r
- for (var i=0; i<li.childNodes.length; i++) {\r
- result=find_listnode_recursive(li.childNodes[i]);\r
- if (result!=null) return result;\r
- }\r
- return null; \r
-}\r
-\r
-function next_actual_sibling_listnode(li) {\r
- if (li==null) return null;\r
- var temp=li;\r
- while (1) { \r
- var n = temp.nextSibling;\r
- if (n==null) {\r
- n=parent_listnode(temp);\r
- return next_actual_sibling_listnode(n);\r
- }\r
- if (is_list_node(n)) return n;\r
- temp=n;\r
- }\r
-}\r
-\r
-function next_sibling_listnode(li) {\r
-if (li==null) return null; \r
- var result=null;\r
- var temp=li;\r
- if (is_col(temp)) return next_child_listnode(temp);\r
- while (1) { \r
- var n = temp.nextSibling;\r
- if (n==null) {\r
- n=parent_listnode(temp);\r
- return next_actual_sibling_listnode(n);\r
- }\r
- if (is_list_node(n)) return n;\r
- temp=n;\r
- }\r
-}\r
-\r
-function last_sibling_listnode(li) {\r
- if (li==null) return null;\r
- var temp=li;\r
- var last=null;\r
- while(1) {\r
- var n = temp.nextSibling;\r
- if (is_list_node(temp)) \r
- last = temp;\r
- if (n==null) {\r
- if (is_col(last)) return last_sibling_listnode(next_child_listnode(last));\r
- else return last;\r
- }\r
- temp = n;\r
- }\r
-}\r
-\r
-function prev_sibling_listnode(li) { \r
- if (li==null) return null;\r
- var temp=li;\r
- var n = null;\r
- while (1) { \r
- n = temp.previousSibling;\r
- if (n==null) {\r
- return parent_listnode(li);\r
- }\r
- if (is_list_node(n)) {\r
- if (is_col(n)) { \r
- return last_sibling_listnode(next_child_listnode(n));\r
- }\r
- else {\r
- return n;\r
- }\r
- }\r
- temp=n;\r
- }\r
-}\r
-\r
-\r
-function parent_listnode(li) {\r
- // added 12.7.2004 to prevent IE error when readonly mode==true\r
- if (li==null) return null;\r
- n=li;\r
- while (1) {\r
- n=n.parentNode;\r
- if (n==null) return null;\r
- if (is_list_node(n)) return n;\r
- }\r
-}\r
-\r
-function getVisibleParents(id) {\r
- var n = document.getElementById(id);\r
- while(1) {\r
- expand(n);\r
- n = parent_listnode(n);\r
- if (n==null) return;\r
- }\r
-}\r
-\r
-function onClickHandler (evt) {\r
-if (lastnode==null) \r
-{\r
-listnodes = document.getElementsByTagName('li');\r
-lastnode=listnodes[1];\r
-temp=listnodes[1];\r
-}\r
-\r
-\r
- var target = evt ? evt.target : event.srcElement;\r
- if (!is_list_node(target)) return;\r
- toggle(target);\r
- set_lastnode(target);\r
-}\r
-\r
-\r
-function expand(node) {\r
- if (!is_exp(node)) return;\r
- if (node.className=='exp_active') \r
- node.className='col_active';\r
- else \r
- node.className='col';\r
- setSubClass(node,'subexp');\r
- // getsub(node).className='subexp';\r
-}\r
-\r
-function collapse(node) {\r
- if (!is_col(node)) return;\r
- \r
-if (node.className=='col_active')\r
- node.className='exp_active'\r
- else \r
- node.className='exp';\r
-\r
- setSubClass(node,'sub');\r
-// getsub(node).className='sub';\r
-\r
-}\r
-\r
-function setSubClass(node,name) {\r
- sub = getsub(node);\r
- if (sub==null) return;\r
- sub.className=name; \r
-}\r
-\r
-function toggle(target) {\r
- if (!is_list_node(target)) return;\r
- if (is_col(target)) {\r
- target.className='exp';\r
- setSubClass(target,'sub');\r
- // getsub(target).className='sub';\r
- }\r
- else if (is_exp(target)) {\r
- target.className='col';\r
- setSubClass(target,'subexp');\r
- // getsub(target).className='subexp';\r
- }\r
- \r
-}\r
-\r
-function expandAll(node) {\r
- if (node.className=='exp') {\r
- node.className='col';\r
- setSubClass(node,'subexp');\r
-// getsub(node).className='subexp';\r
- }\r
- var i;\r
- if (node.childNodes!=null) \r
-// if (node.hasChildNodes()) \r
- for ( i = 0; i<node.childNodes.length; i++)\r
- expandAll(node.childNodes[i]);\r
-}\r
-\r
-function collapseAll(node) {\r
- if (node.className=='col') {\r
- node.className='exp';\r
- setSubClass(node,'sub');\r
-// getsub(node).className='sub';\r
- }\r
- var i; \r
- if (node.childNodes!=null) \r
-// for opera if (node.hasChildNodes()) \r
- for ( i = 0; i<node.childNodes.length; i++)\r
- collapseAll(node.childNodes[i]);\r
-}\r
-\r
-\r
-\r
-function unFocus(node) {\r
- // unfocuses potential link that is to be hidden (if a==null there is no link so it should not be blurred).\r
- // tested with mozilla 1.7, 12.7.2004. /mn (\r
- intemp=parent_listnode(node); \r
- a = get_link(intemp); // added 6.4. to get keyboard working with\r
- // moved before collapse to prevent an error message with IE when readonly==true \r
- if (a!=null) a.blur(); // netscape after collapsing a focused node\r
- return intemp;\r
-}\r
-\r
-// mode: 0==keypress, 1==keyup\r
-function keyfunc(evt,mode) {\r
- var c = get_keycode(evt);\r
- var temp = null;\r
- var a = null;\r
-\r
- if (lastnode==null) {\r
- listnodes = document.getElementsByTagName('li');\r
- lastnode=listnodes[1];\r
- temp=listnodes[1];\r
- }\r
-\r
- //window.alert(c);\r
- if (checkup(mode,c)) { // i \r
- temp=prev_sibling_listnode(lastnode);\r
- }\r
- else if (checkdn(mode,c)) { // k\r
- temp=next_sibling_listnode(lastnode);\r
- }\r
- else if (checkr(mode,c)) { // l\r
- expand(lastnode);\r
- // temp=next_child_listnode(lastnode);\r
- // if (temp==null) {\r
- a = get_link(lastnode);\r
- if (a!=null) a.focus(); else self.focus(); \r
- //}\r
- }\r
- else if (checkl(mode,c)) { // j\r
- if (is_col(lastnode)) {\r
- unFocus(lastnode);\r
- collapse(lastnode);\r
- }\r
- else {\r
- temp=unFocus(lastnode);\r
- collapse(temp);\r
- }\r
- // if (temp==null) lastnode.focus(); // forces focus to correct div (try mozilla typesearch) (doesn't seem to work -mn/6.4.2004)\r
- }\r
- else return;\r
- if (temp!=null) set_lastnode(temp);\r
-\r
- // alert('pressed ' + String.fromCharCode(c) + '(' + c + ')');\r
- return true;\r
-}\r
-\r
-\r
-function keytest (evt) {\r
- return keyfunc(evt,1);\r
-};\r
-\r
-\r
-function presstest (evt) {\r
- return keyfunc(evt,0);\r
-};\r
-\r
-\r
- document.onclick = onClickHandler;\r
- document.onkeypress = presstest;\r
- document.onkeyup = keytest;\r
+/* MarkTree JavaScript code
+ *
+ * The contents of this file are subject to the Mozilla Public License Version
+ * 1.1 (the "License"); you may not use this file except in compliance with
+ * the License. You may obtain a copy of the License at
+ * http://www.mozilla.org/MPL/
+ *
+ * Software distributed under the License is distributed on an "AS IS" basis,
+ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+ * for the specific language governing rights and limitations under the
+ * License.
+ *
+ * Miika Nurminen, 12.7.2004.
+ */
+
+/* cross-browser (tested with ie5, mozilla 1 and opera 5) keypress detection */
+function get_keycode(evt) {
+ // IE
+ code = document.layers ? evt.which
+ : document.all ? event.keyCode // event.keyCode!=evt.keyCode!
+ : evt.keyCode;
+
+ if (code==0)
+ code=evt.which; // for NS
+ return code;
+}
+
+var lastnode=null;
+var listnodes = null;
+var list_index=1;
+var lastnodetype=''; // determines if node is a link, input or text;
+
+// up, left, down, right, keypress codes
+//ijkl
+//var keys = new Array(105,106,107,108);
+//num arrows
+//var keys = new Array(56,52,50,54);
+//wasd
+// var press2 = new Array(119,97,115,100);
+ var press = new Array(47,45,42,43);
+
+// keydown codes
+ // var keys2=new Array(87,65,83,68);
+ var keys= new Array(38,37,40,39);
+
+ // keyset 1 = keydown, otherwise press
+function checkup(keyset,n) {
+ if (keyset==1) return (n==keys[0]);
+ return ((n==press[0]) /*|| (n==press2[0])*/)
+}
+
+function checkdn(keyset,n) {
+ if (keyset==1) return (n==keys[2]);
+ return ((n==press[2]) /*|| (n==press2[2])*/)
+}
+
+function checkl(keyset,n) {
+ if (keyset==1) return (n==keys[1]);
+ return ((n==press[1]) /*|| (n==press2[1])*/)
+}
+
+function checkr(keyset,n) {
+ if (keyset==1) return (n==keys[3]);
+ return ((n==press[3]) /*|| (n==press2[3])*/)
+}
+
+
+
+
+
+function is_exp(n) {
+ if (n==null) return false;
+ return ((n.className=='exp') || (n.className=='exp_active'));
+}
+
+function is_col(n) {
+ if (n==null) return false;
+ return ((n.className=='col') || (n.className=='col_active'));
+}
+
+function is_basic(n) {
+ if (n==null) return false;
+ return ((n.className=='basic') || (n.className=='basic_active'));
+}
+
+
+
+/* returns i>=0 if true */
+function is_active(node) {
+ if (node.className==null) return false
+ return node.className.indexOf('_active');
+}
+
+function toggle_class(node) {
+ if ((node==null) || (node.className==null)) return;
+ str=node.className;
+ result="";
+ i = str.indexOf('_active');
+ if (i>0)
+ result= str.substr(0,i);
+ else
+ result= str+"_active";
+ node.className=result;
+ return node;
+}
+
+function activate(node) {
+ node.style.backgroundColor='#eeeeff';
+}
+
+function deactivate(node) {
+ node.style.backgroundColor='#ffffff';
+}
+
+function is_list_node(n) {
+ if (n==null) return false;
+ if (n.className==null) return false;
+ if ( (is_exp(n)) ||
+ (is_col(n)) ||
+ (is_basic(n)) )
+ return true; else return false;
+}
+
+
+function get_href(n) {
+ alist=n.attributes;
+ if (alist!=null) {
+ hr = alist.getNamedItem('href');
+ if (hr!=null) return hr.nodeValue;
+ }
+ if (n.childNodes.length==0) return '';
+ for (var i=0; i<n.childNodes.length; i++) {
+ s = get_href(n.childNodes[i]);
+ if (s!='') return s;
+ }
+ return '';
+}
+
+function get_link(n) {
+ if (n==null) return null;
+ if (n.style==null) return null;
+
+ // disabling uncontrolled recursion to prevent error messages on IE
+ // when trying to focus to invisible links (readonly mode)
+// alert(n.nodeName+' '+n.className);
+ if ((n.nodeName=='UL') && (n.className=='sub')) return null;
+
+ if (n.nodeName=='A') return n;
+ if (n.childNodes.length==0) return null;
+ for (var i=0; i<n.childNodes.length; i++) {
+ s = get_link(n.childNodes[i]);
+ if (s!=null) return s;
+ }
+ return null;
+}
+
+function set_lastnode(n) {
+/*var d = new Date();
+var t_mil = d.getMilliseconds();*/
+// testattu nopeuksia explorerilla, ei merkittäviä eroja
+ if (lastnode==n) return;
+/* deactivate(lastnode)
+ lastnode=n;
+ activate(lastnode);*/
+
+ if (is_active(lastnode)>=0)
+ toggle_class(lastnode);
+ lastnode=n;
+ if (!(is_active(lastnode)>=0))
+ toggle_class(lastnode);
+
+
+/*var d2 = new Date();
+var t_mil2 = d2.getMilliseconds();
+ window.alert(t_mil2-t_mil);*/
+}
+
+function next_list_node() {
+ tempIndex = list_index;
+ while (tempIndex<listnodes.length-1) {
+ tempIndex++;
+ var x = listnodes[tempIndex];
+ if (is_list_node(x)) {
+ list_index=tempIndex;
+ return;
+ }
+ }
+}
+
+function prev_list_node() {
+ tempIndex = list_index;
+ while (tempIndex>0) {
+ tempIndex--;
+ var x = listnodes[tempIndex];
+ if (is_list_node(x)) {
+ list_index=tempIndex;
+ return;
+ }
+ }
+}
+
+
+
+function getsub (li) {
+ if (li.childNodes.length==0) return null;
+ for (var c = 0; c < li.childNodes.length; c++)
+ if ( (li.childNodes[c].className == 'sub') || (li.childNodes[c].className == 'subexp') )
+ return li.childNodes[c];
+}
+
+function find_listnode_recursive (li) {
+ if (is_list_node(li)) return li;
+ if (li.childNodes.length==0) return null;
+ result=null;
+ for (var c = 0; c < li.childNodes.length; c++) {
+ result=find_listnode_recursive(li.childNodes[c]);
+ if (result!=null) return result;
+ }
+ return null;
+}
+
+function next_child_listnode(li) {
+ var result=null;
+ for (var i=0; i<li.childNodes.length; i++) {
+ result=find_listnode_recursive(li.childNodes[i]);
+ if (result!=null) return result;
+ }
+ return null;
+}
+
+function next_actual_sibling_listnode(li) {
+ if (li==null) return null;
+ var temp=li;
+ while (1) {
+ var n = temp.nextSibling;
+ if (n==null) {
+ n=parent_listnode(temp);
+ return next_actual_sibling_listnode(n);
+ }
+ if (is_list_node(n)) return n;
+ temp=n;
+ }
+}
+
+function next_sibling_listnode(li) {
+if (li==null) return null;
+ var result=null;
+ var temp=li;
+ if (is_col(temp)) return next_child_listnode(temp);
+ while (1) {
+ var n = temp.nextSibling;
+ if (n==null) {
+ n=parent_listnode(temp);
+ return next_actual_sibling_listnode(n);
+ }
+ if (is_list_node(n)) return n;
+ temp=n;
+ }
+}
+
+function last_sibling_listnode(li) {
+ if (li==null) return null;
+ var temp=li;
+ var last=null;
+ while(1) {
+ var n = temp.nextSibling;
+ if (is_list_node(temp))
+ last = temp;
+ if (n==null) {
+ if (is_col(last)) return last_sibling_listnode(next_child_listnode(last));
+ else return last;
+ }
+ temp = n;
+ }
+}
+
+function prev_sibling_listnode(li) {
+ if (li==null) return null;
+ var temp=li;
+ var n = null;
+ while (1) {
+ n = temp.previousSibling;
+ if (n==null) {
+ return parent_listnode(li);
+ }
+ if (is_list_node(n)) {
+ if (is_col(n)) {
+ return last_sibling_listnode(next_child_listnode(n));
+ }
+ else {
+ return n;
+ }
+ }
+ temp=n;
+ }
+}
+
+
+function parent_listnode(li) {
+ // added 12.7.2004 to prevent IE error when readonly mode==true
+ if (li==null) return null;
+ n=li;
+ while (1) {
+ n=n.parentNode;
+ if (n==null) return null;
+ if (is_list_node(n)) return n;
+ }
+}
+
+function getVisibleParents(id) {
+ var n = document.getElementById(id);
+ while(1) {
+ expand(n);
+ n = parent_listnode(n);
+ if (n==null) return;
+ }
+}
+
+function onClickHandler (evt) {
+if (lastnode==null)
+{
+listnodes = document.getElementsByTagName('li');
+lastnode=listnodes[1];
+temp=listnodes[1];
+}
+
+
+ var target = evt ? evt.target : event.srcElement;
+ if (!is_list_node(target)) return;
+ toggle(target);
+ set_lastnode(target);
+}
+
+
+function expand(node) {
+ if (!is_exp(node)) return;
+ if (node.className=='exp_active')
+ node.className='col_active';
+ else
+ node.className='col';
+ setSubClass(node,'subexp');
+ // getsub(node).className='subexp';
+}
+
+function collapse(node) {
+ if (!is_col(node)) return;
+
+if (node.className=='col_active')
+ node.className='exp_active'
+ else
+ node.className='exp';
+
+ setSubClass(node,'sub');
+// getsub(node).className='sub';
+
+}
+
+function setSubClass(node,name) {
+ sub = getsub(node);
+ if (sub==null) return;
+ sub.className=name;
+}
+
+function toggle(target) {
+ if (!is_list_node(target)) return;
+ if (is_col(target)) {
+ target.className='exp';
+ setSubClass(target,'sub');
+ // getsub(target).className='sub';
+ }
+ else if (is_exp(target)) {
+ target.className='col';
+ setSubClass(target,'subexp');
+ // getsub(target).className='subexp';
+ }
+
+}
+
+function expandAll(node) {
+ if (node.className=='exp') {
+ node.className='col';
+ setSubClass(node,'subexp');
+// getsub(node).className='subexp';
+ }
+ var i;
+ if (node.childNodes!=null)
+// if (node.hasChildNodes())
+ for ( i = 0; i<node.childNodes.length; i++)
+ expandAll(node.childNodes[i]);
+}
+
+function collapseAll(node) {
+ if (node.className=='col') {
+ node.className='exp';
+ setSubClass(node,'sub');
+// getsub(node).className='sub';
+ }
+ var i;
+ if (node.childNodes!=null)
+// for opera if (node.hasChildNodes())
+ for ( i = 0; i<node.childNodes.length; i++)
+ collapseAll(node.childNodes[i]);
+}
+
+
+
+function unFocus(node) {
+ // unfocuses potential link that is to be hidden (if a==null there is no link so it should not be blurred).
+ // tested with mozilla 1.7, 12.7.2004. /mn (
+ intemp=parent_listnode(node);
+ a = get_link(intemp); // added 6.4. to get keyboard working with
+ // moved before collapse to prevent an error message with IE when readonly==true
+ if (a!=null) a.blur(); // netscape after collapsing a focused node
+ return intemp;
+}
+
+// mode: 0==keypress, 1==keyup
+function keyfunc(evt,mode) {
+ var c = get_keycode(evt);
+ var temp = null;
+ var a = null;
+
+ if (lastnode==null) {
+ listnodes = document.getElementsByTagName('li');
+ lastnode=listnodes[1];
+ temp=listnodes[1];
+ }
+
+ //window.alert(c);
+ if (checkup(mode,c)) { // i
+ temp=prev_sibling_listnode(lastnode);
+ }
+ else if (checkdn(mode,c)) { // k
+ temp=next_sibling_listnode(lastnode);
+ }
+ else if (checkr(mode,c)) { // l
+ expand(lastnode);
+ // temp=next_child_listnode(lastnode);
+ // if (temp==null) {
+ a = get_link(lastnode);
+ if (a!=null) a.focus(); else self.focus();
+ //}
+ }
+ else if (checkl(mode,c)) { // j
+ if (is_col(lastnode)) {
+ unFocus(lastnode);
+ collapse(lastnode);
+ }
+ else {
+ temp=unFocus(lastnode);
+ collapse(temp);
+ }
+ // if (temp==null) lastnode.focus(); // forces focus to correct div (try mozilla typesearch) (doesn't seem to work -mn/6.4.2004)
+ }
+ else return;
+ if (temp!=null) set_lastnode(temp);
+
+ // alert('pressed ' + String.fromCharCode(c) + '(' + c + ')');
+ return true;
+}
+
+
+function keytest (evt) {
+ return keyfunc(evt,1);
+};
+
+
+function presstest (evt) {
+ return keyfunc(evt,0);
+};
+
+
+ document.onclick = onClickHandler;
+ document.onkeypress = presstest;
+ document.onkeyup = keytest;