vndb/manned
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Wrote a more dynamic navigation bar

Browse source 
Not finished yet, though.
This commit is contained in:
Yorhel 2012-07-04 09:10:03 +02:00
parent 43eca4c20e
commit 311b4ee327
3 changed files with 117 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

6
www/index.pl
View file

@ -305,7 +305,7 @@ sub manjslist {
# For JS: (Already sorted)
# [
# ["System", "Full name", [
# ["System", "Full name", "short" [
# [ "package", "version", [
# [ "section", "locale"||null ],
# ...
@ -319,7 +319,7 @@ sub manjslist {
my %sys;
push @{$sys{$_->{system}}}, $_ for (@$m);
[
map [ $self->{sysbyid}{$_}{name}, $self->{sysbyid}{$_}{full},
map [ $self->{sysbyid}{$_}{name}, $self->{sysbyid}{$_}{full}, $self->{sysbyid}{$_}{short},
do {
my %pkgs;
for(@{$sys{$_}}) {
@ -394,7 +394,7 @@ sub man {
my $man = getman($self, $name, $hash, $m);
$self->htmlHeader(title => $name);
dl id => 'nav', ' '; # To be filled in by JS
div id => 'nav', ' '; # To be filled in by JS
h1 $man->{name};
p;