X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-live.git;a=blobdiff_plain;f=yarrg%2Fweb%2Fquery_age;h=fd2044d97b4463457d88776b71dc0000b45590ea;hp=7cfe54e291799e6c8daa53ec0207c0f4d37eeead;hb=eb4dd353926d8d5f38ea442ee172ce0b2bb5925e;hpb=3ce667a2d3fd7c36f60da86bb59071264790e375 diff --git a/yarrg/web/query_age b/yarrg/web/query_age index 7cfe54e..fd2044d 100644 --- a/yarrg/web/query_age +++ b/yarrg/web/query_age @@ -52,6 +52,7 @@ my $sth= $dbh->prepare("SELECT archipelago, islandid, islandname, timestamp $sth->execute(); +
<& SELF:pageload &> <%method pageload> @@ -69,12 +70,11 @@ $sth->execute(); $now $fetchrow - +
% my $row; % my %da_ages; % my %ts_sortkeys; @@ -142,6 +142,7 @@ Time since this page loaded: <& "lookup:formhidden", ours => sub { 0; } &> + <%init> use POSIX; use CommodsWeb;
Archipelago Island Age -