# -------------------------------------------------------------------------- # # EXTEND MENU HASH TO HASH OF HASHES WITH INNER HASHES REPRESENTING SUBMENU # -------------------------------------------------------------------------- # # Hash of menu options and links -- key is title => value is array of link, label, public and position our %menuOptions = ( 'home' => ["/cgi-bin/home", "Home", 1, 2], 'contact' => ["/cgi-bin/contact", "Contact", 1, 9], 'account' => ["/cgi-bin/user", "My account", 0, 11], 'reportusers' => ["/cgi-bin/user?userDetailsAction=reportUserDetails", "Users report", 0, 12], 'check' => ["/cgi-bin/check", "Check web parameters", 0, 20] ); our %subMenuOptions = ( 'home' => { 'homesub1' => ["/cgi-bin/home", "Submenu item 1", 1, 1, "home"], 'homesub2' => ["/cgi-bin/home", "Submenu item 2", 1, 2, "home"], 'homesub3' => ["/cgi-bin/home", "Submenu item 3", 1, 3, "home"], 'homesub4' => ["/cgi-bin/homeSub4", "Submenu item 4", 1, 4, "home"], 'homesub5' => ["/cgi-bin/home", "Submenu item 5", 1, 5, "home"] }, 'account' => { 'accountssub1' => ["/cgi-bin/user", "Submenu item 1", 1, 1, "account"], 'accountssub2' => ["/cgi-bin/user", "Submenu item 2", 1, 2, "account"], 'accountssub3' => ["/cgi-bin/user", "Submenu item 3", 1, 3, "account"], 'accountssub4' => ["/cgi-bin/user", "Submenu item 4", 1, 4, "account"], 'accountssub5' => ["/cgi-bin/user", "Submenu item 5", 1, 5, "account"] } ); # -------------------------------------------------------------------------- # # -------------------------------------------------------------------------- # # UPDATE FOLLOWING METHOD in Page.pm # -------------------------------------------------------------------------- # ################################################################################ # # # Write out navigation menu # # # ################################################################################ sub writeMenu { my $self = shift; my $title = shift; print qq ( ); } # -------------------------------------------------------------------------- # # ADD TO CSS FILE # -------------------------------------------------------------------------- # div[id$=_subMenu] { margin-right: 0; } div.subMenu { padding: 3px 5px; margin: 3px 3px 3px 20px; text-align: right; font-size: 90%; border: 1px solid #f0f0f0; border-radius: 10px; background-color: #f8f8f8; } div.subMenu.highlight { border: 1px solid gray; background-color: #99ffcc; } div.mainMenu { padding: 3px 5px; margin: 3px; font-size: 100%; text-align: left; font-size: 90%; border: 1px solid #f0f0f0; border-radius: 10px; background-color: #f8f8f8; } div.mainMenu.highlight { border: 1px solid gray; background-color: #c6e6fc; } # -------------------------------------------------------------------------- #