X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=mason%2Fmain;h=4e98c172f9cb21c85203777e0a4722f701a42a64;hb=dd6268cdf15ec8d2670e195cfebceb5116b61229;hp=8a2533f3dec18ece1ce9ec8efc8139ad5f29bf60;hpb=e4d5c2aa7fa9dc49cbdece5472dcb155d5833ea9;p=nj-awaymsg.git diff --git a/mason/main b/mason/main index 8a2533f..4e98c17 100755 --- a/mason/main +++ b/mason/main @@ -1,35 +1,74 @@ <%init> use AwayMsg; +db_connect(); +my ($sth,$row,$sthi,$rowi); %init>
Address | -O-o-o status | +Status | Which message? | -Expiry date | ||||
<% $row->{'emailaddr'} |h %> | % if (defined $row->{'textid'}) { -% my $expiry = expires2timet($row->{'expires'}); -% if ($expiry > time) { -active | -<% $row->{'textid'} |h %> | -<% $row->{'expires'} |h %> | -+ | <% $row->{'desc'} |h %> | +% } else { +inactive | ++ | +% } + |