stas 02/05/13 22:15:41 Modified: tmpl/custom/html menu_main Log: align properly Revision Changes Path 1.7 +6 -5 modperl-docs/tmpl/custom/html/menu_main Index: menu_main =================================================================== RCS file: /home/cvs/modperl-docs/tmpl/custom/html/menu_main,v retrieving revision 1.6 retrieving revision 1.7 diff -u -r1.6 -r1.7 --- menu_main 13 Apr 2002 14:56:29 -0000 1.6 +++ menu_main 14 May 2002 05:15:41 -0000 1.7 @@ -6,20 +6,21 @@ # collect the top level data # first go up to the absolute root l = nav; # remember last valid node + p = nav.up; WHILE p; - l = p; - p = p.up; + l = p; + p = p.up; END; p = l; # last valid node IF p.parent_rel_path.defined; - prefix = p.parent_rel_path; + prefix = p.parent_rel_path; ELSE; - prefix = "."; + prefix = "."; END; IF rel_doc_root.defined; - prefix = "$prefix/$rel_doc_root"; + prefix = "$prefix/$rel_doc_root"; END; # walk through the top level nodes
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]