summaryrefslogtreecommitdiff
path: root/lib/VNWeb/Docs/Page.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/VNWeb/Docs/Page.pm')
-rw-r--r--lib/VNWeb/Docs/Page.pm15
1 files changed, 8 insertions, 7 deletions
diff --git a/lib/VNWeb/Docs/Page.pm b/lib/VNWeb/Docs/Page.pm
index 54c10b68..e9949ab3 100644
--- a/lib/VNWeb/Docs/Page.pm
+++ b/lib/VNWeb/Docs/Page.pm
@@ -6,7 +6,7 @@ use VNWeb::Docs::Lib;
sub _index_ {
ul_ class => 'index', sub {
- li_ sub { b_ 'Guidelines' };
+ li_ sub { strong_ 'Guidelines' };
li_ sub { a_ href => '/d5', 'Editing Guidelines' };
li_ sub { a_ href => '/d2', 'Visual Novels' };
li_ sub { a_ href => '/d15', 'Special Games' };
@@ -15,15 +15,15 @@ sub _index_ {
li_ sub { a_ href => '/d16', 'Staff' };
li_ sub { a_ href => '/d12', 'Characters' };
li_ sub { a_ href => '/d10', 'Tags & Traits' };
+ li_ sub { a_ href => '/d19', 'Image Flagging' };
li_ sub { a_ href => '/d13', 'Capturing Screenshots' };
- li_ sub { b_ 'About VNDB' };
+ li_ sub { strong_ 'About VNDB' };
li_ sub { a_ href => '/d9', 'Discussion Board' };
li_ sub { a_ href => '/d6', 'FAQ' };
li_ sub { a_ href => '/d7', 'About Us' };
li_ sub { a_ href => '/d17', 'Privacy Policy & Licensing' };
li_ sub { a_ href => '/d11', 'Database API' };
li_ sub { a_ href => '/d14', 'Database Dumps' };
- li_ sub { a_ href => '/d18', 'Database Querying' };
li_ sub { a_ href => '/d8', 'Development' };
}
}
@@ -31,20 +31,21 @@ sub _index_ {
sub _rev_ {
my $d = shift;
- revision_ d => $d, sub {},
+ revision_ $d, sub {},
[ title => 'Title' ],
[ content => 'Contents' ];
}
TUWF::get qr{/$RE{drev}} => sub {
- my $d = db_entry d => tuwf->capture('id'), tuwf->capture('rev');
+ my $d = db_entry tuwf->captures('id', 'rev');
return tuwf->resNotFound if !$d;
- framework_ title => $d->{title}, index => !tuwf->capture('rev'), type => 'd', dbobj => $d, hiddenmsg => 1,
+ framework_ title => $d->{title}, index => !tuwf->capture('rev'), dbobj => $d, hiddenmsg => 1,
sub {
_rev_ $d if tuwf->capture('rev');
- div_ class => 'mainbox', sub {
+ article_ sub {
+ itemmsg_ $d;
h1_ $d->{title};
div_ class => 'docs', sub {
_index_;