Some new releases and fixes
This commit is contained in:
parent
2192e68775
commit
5c85a7d32f
15 changed files with 132 additions and 85 deletions
14
index.cgi
14
index.cgi
|
|
@ -12,6 +12,8 @@ BEGIN { ($ROOT = abs_path $0) =~ s{index\.cgi$}{}; }
|
|||
|
||||
|
||||
my @changes = (
|
||||
[ '2019-02-04', '/ncdu', 'ncdu 1.14 released' ],
|
||||
[ '2018-02-23', '/nginx-confgen', 'nginx-confgen 1.2 released' ],
|
||||
[ '2018-02-18', '/tuwf', 'TUWF 1.2 released' ],
|
||||
[ '2018-01-29', '/ncdu', 'ncdu 1.13 released' ],
|
||||
[ '2018-01-24', '/nginx-confgen', 'nginx-confgen 1.1 released' ],
|
||||
|
|
@ -118,7 +120,7 @@ TUWF::register(
|
|||
qr{nginx-confgen/man} => sub { podpage(shift, 'nginx-confgen-man', 'nginx-confgen', 'man', 'The nginx-confgen(1) Man Page', 1) },
|
||||
qr{nginx-confgen/changes} => sub { changelog(shift, 'nginx-confgen-changelog', undef, 'nginx-confgen', 'changes', 'nginx-confgen Changelog', 1) },
|
||||
qr{tuwf} => sub { podpage(shift, 'tuwf', 'tuwf', '', 'The Ultimate Website Framework') },
|
||||
qr{tuwf/man(?:/(db|intro|misc|request|response|xml))?} => \&tuwfmanual,
|
||||
qr{tuwf/man(?:/(db|intro|misc|request|response|validate|xml))?} => \&tuwfmanual,
|
||||
qr{tuwf/changes} => sub { changelog(shift, 'tuwf-changelog', 'TUWF', 'tuwf', 'changes', 'TUWF Changelog') },
|
||||
qr{ylib} => sub { podpage(shift, 'ylib/README.pod', 'ylib', '', 'Ylib') },
|
||||
qr{yxml} => sub { podpage(shift, 'yxml', 'yxml', '', 'Yxml - A small, fast and correct* XML parser') },
|
||||
|
|
@ -478,8 +480,9 @@ sub htmlHeader {
|
|||
div class => 'notes';
|
||||
txt 'Yoran Heling'; br;
|
||||
a href => 'mailto:projects@yorhel.nl', 'projects@yorhel.nl';
|
||||
br; a href => 'https://yorhel.nl', 'home';
|
||||
txt ' - '; a href => 'http://g.blicky.net', 'git repos';
|
||||
br; a href => 'https://yorhel.nl/', 'home';
|
||||
txt ' - '; a href => 'https://g.blicky.net/', 'git';
|
||||
txt ' - '; a href => 'https://niu.moe/@ayo', '@ayo';
|
||||
br; b '= donate =';
|
||||
a href => 'https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=BBF8LGT2LLNFN&lc=US¤cy_code=EUR&bn=PP%2dDonationsBF%3abtn_donate_SM%2egif%3aNonHosted', 'paypal';
|
||||
br; b '= pgp =';
|
||||
|
|
@ -511,7 +514,7 @@ sub htmlMenu {
|
|||
h1 class => 'title', "~ \u$o{page} ~" if $o{spec}{$o{page}};
|
||||
my $m = sub {
|
||||
li;
|
||||
my $s = ($_[0] =~ m{^/([^/]+)} && $o{spec}{$1} && $o{page} ne $1) || $_[0] =~ m{^http://};
|
||||
my $s = ($_[0] =~ m{^/([^/]+)} && $o{spec}{$1} && $o{page} ne $1) || $_[0] =~ m{^https?://};
|
||||
my @c = ($s?'special':(), $_[2]?'menusel':(), $_[4]?'tiny':());
|
||||
a href => $_[0], @c?(class => join ' ',@c):(), $_[1];
|
||||
if($_[3]) {
|
||||
|
|
@ -556,9 +559,11 @@ sub htmlMenu {
|
|||
$m->('/tuwf/man/misc', '::Misc', $o{sec} eq 'man' && $o{sec2} eq 'misc');
|
||||
$m->('/tuwf/man/request', '::Request', $o{sec} eq 'man' && $o{sec2} eq 'request');
|
||||
$m->('/tuwf/man/response', '::Response', $o{sec} eq 'man' && $o{sec2} eq 'response');
|
||||
$m->('/tuwf/man/validate', '::Validate', $o{sec} eq 'man' && $o{sec2} eq 'validate');
|
||||
$m->('/tuwf/man/xml', '::XML', $o{sec} eq 'man' && $o{sec2} eq 'xml');
|
||||
});
|
||||
$m->('/tuwf/changes', 'Changelog', $o{sec} eq 'changes');
|
||||
$m->('https://code.blicky.net/yorhel/tuwf/issues', 'Issues');
|
||||
} elsif($o{page} eq 'yxml') {
|
||||
$m->('/yxml', 'Info', !$o{sec});
|
||||
$m->('/yxml/man', 'Manual', $o{sec} eq 'man');
|
||||
|
|
@ -567,6 +572,7 @@ sub htmlMenu {
|
|||
$m->('/nginx-confgen', 'Info', !$o{sec});
|
||||
$m->('/nginx-confgen/man', 'Manual', $o{sec} eq 'man');
|
||||
$m->('/nginx-confgen/changes', 'Changelog', $o{sec} eq 'changes');
|
||||
$m->('https://code.blicky.net/yorhel/nginx-confgen/issues', 'Issues');
|
||||
} else {
|
||||
$m->('/', 'Home', !$o{page});
|
||||
$m->('/ncdu', 'Ncdu ');
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue