Added Globster project
This commit is contained in:
parent
c1e08277ef
commit
2e29709225
4 changed files with 110 additions and 8 deletions
21
index.cgi
21
index.cgi
|
|
@ -12,6 +12,7 @@ BEGIN { ($ROOT = abs_path $0) =~ s{index\.cgi$}{}; }
|
|||
|
||||
|
||||
my @changes = (
|
||||
[ '2012-12-15', '/globster', 'Announcing yet another awesome project: Globster!' ],
|
||||
[ '2012-12-02', '/ncdu/jsonfmt', 'Documented the ncdu export file format' ],
|
||||
[ '2012-11-04', '/ncdc', 'ncdc 1.14 released' ],
|
||||
[ '2012-10-17', '/dump', 'Added reference to my repo of small C libs to the code dump' ],
|
||||
|
|
@ -79,6 +80,8 @@ TUWF::register(
|
|||
qr{ncdc/man} => sub { podpage(shift, 'ncdc-man', 'ncdc', 'man', 'Ncdc Manual', 1) },
|
||||
qr{ncdc/install} => sub { podpage(shift, 'ncdc-install', 'ncdc', 'install', 'Ncdc Installation Instructions', 1) },
|
||||
qr{ncdc/changes} => sub { changelog(shift, 'ncdc-changelog', 'ncdc', 'ncdc', 'changes', 'Ncdc Changelog') },
|
||||
qr{globster} => sub { podpage(shift, 'globster', 'globster', '', 'The Globster Direct Connect Client') },
|
||||
qr{globster/api} => sub { podpage(shift, 'globster-api', 'globster', 'api', 'The Globster D-Bus API', 1) },
|
||||
qr{tuwf} => sub { podpage(shift, 'tuwf', 'tuwf', '', 'The Ultimate Website Framework') },
|
||||
qr{tuwf/man(?:/(db|misc|request|response|xml))?} => \&tuwfmanual,
|
||||
qr{tuwf/changes} => sub { changelog(shift, 'tuwf-changelog', 'TUWF', 'tuwf', 'changes', 'TUWF Changelog') },
|
||||
|
|
@ -380,7 +383,7 @@ sub genChanges {
|
|||
sub htmlHeader {
|
||||
my $s = shift;
|
||||
my %o = (
|
||||
spec => { map +($_,1), qw|ncdu ncdc tuwf| },
|
||||
spec => { map +($_,1), qw|ncdu ncdc globster tuwf| },
|
||||
page => '',
|
||||
sec => '',
|
||||
sec2 => '',
|
||||
|
|
@ -462,6 +465,9 @@ sub htmlMenu {
|
|||
$m->('/ncdc/changes', 'Changelog', $o{sec} eq 'changes');
|
||||
$m->('/ncdc/scr', 'Screenshots', $o{sec} eq 'scr');
|
||||
$m->('/ncdc/bug', 'Bug tracker', $o{sec} eq 'bug');
|
||||
} elsif($o{page} eq 'globster') {
|
||||
$m->('/globster', 'Info', !$o{sec});
|
||||
$m->('/globster/api', 'API Docs', $o{sec} eq 'api');
|
||||
} elsif($o{page} eq 'tuwf') {
|
||||
$m->('/tuwf', 'Info', !$o{sec});
|
||||
$m->('/tuwf/man', 'Manual', $o{sec} eq 'man', sub {
|
||||
|
|
@ -474,12 +480,13 @@ sub htmlMenu {
|
|||
});
|
||||
$m->('/tuwf/changes', 'Changelog', $o{sec} eq 'changes');
|
||||
} else {
|
||||
$m->('/', 'Home', !$o{page});
|
||||
$m->('/ncdu', 'Ncdu ');
|
||||
$m->('/ncdc', 'Ncdc ');
|
||||
$m->('/tuwf', 'Tuwf ');
|
||||
$m->('/doc', 'Articles', $o{page} eq 'doc');
|
||||
$m->('/dump', 'Code dump', $o{page} eq 'dump', sub {
|
||||
$m->('/', 'Home', !$o{page});
|
||||
$m->('/ncdu', 'Ncdu ');
|
||||
$m->('/ncdc', 'Ncdc ');
|
||||
$m->('/globster', 'Globster ');
|
||||
$m->('/tuwf', 'Tuwf ');
|
||||
$m->('/doc', 'Articles', $o{page} eq 'doc');
|
||||
$m->('/dump', 'Code dump', $o{page} eq 'dump', sub {
|
||||
$m->('/dump', 'Misc.', $o{page} eq 'dump' && !$o{sec});
|
||||
$m->('/demo', 'Demos', $o{page} eq 'dump' && $o{sec} eq 'demo');
|
||||
$m->('/dump/awshrink','AWShrink', $o{page} eq 'dump' && $o{sec} eq 'awshrink');
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue