Files
harbour-core/harbour/website/menu/sthilight.js
Viktor Szakats 300160d8b0 2012-09-22 12:05 UTC+0200 Viktor Szakats (harbour syenar.net)
+ website
    + Added Harbour website (except art, docs and stat subdirs)
    ; TODO: configure automatic mechanism to extract site from
            here and regularly updload to sf.net web area
    ; TODO: Clean HTML code, remove unused picture/files, avoid JS
            Any takers?
    ; NOTE: Please make modifications to website code only in
            SVN, then upload the content to web server manually.
            IOW never update on web server directly.
2012-09-22 10:17:39 +00:00

6 lines
962 B
JavaScript

/*=======Ver: 7.0.60906========*/
/*DHTMLMenu, (c) 2006, SourceTec Software Co.,LTD - www.sothink.com*/
function stisL(h,tar,c,w){var t=stgtW(tar,w);var u=t?t.location.href:"";if(!c){u=u.toLowerCase();h=h.toLowerCase();}return u&&h&&(u==h||u==h+"/"||u==h+"#"||STM_ILINK&&u==h.substr(0,Math.max(0,h.indexOf("?")))||STM_ILOC&&h==u.substr(0,Math.max(0,u.indexOf("?"))));}
function stshlp(p){var m=st_ms[p.mid];if(m.ckhd) return; if(m.lits&0x08000000){for(var j=0;j<m.lnks.length;j++){var is=m.lnks[j].dat,pp=[],sn=0,i; for(var l=0;l<is.length;l++){i=is[l];if(i.ishl){do{pp.push(i.parP);i=i.parP.parI;}while(i)} if(m.lits&0x10000000)sn=Math.max(pp.length-m.litl,0);for(var q=pp.length-1;q>=sn;q--){ clearTimeout(pp[q].tid);if(!pp[q].isSh){var los=pp[q].lock;pp[q].lock=0;stshP(pp[q]);pp[q].lock=los;}}}}}}
function stgtW(t,w){if(t=="_self")return w;else if(t=="_parent")return w.parent;else if(t=="_top")return w.top;else return parent.frames[t];return 0;}