From: Ian Jackson Date: Thu, 30 Aug 2012 01:30:25 +0000 (+0100) Subject: wip X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=nj-awaymsg.git;a=commitdiff_plain;h=a8266f995aee0cf7c39c27d9d73b267e56049374 wip --- diff --git a/mason/main b/mason/main index 07a5efe..b70a3de 100755 --- a/mason/main +++ b/mason/main @@ -60,22 +60,17 @@ $sth->execute(); % while (my $row= $sth->fetchrow_hashref()) {

Message "<% $row->{'desc'} |h %>"

- - - -% $sthi->execute($row->{'textid'}); -% while (my $rowi= $sthi->fetchrow_hashref()) { - -% } - - -
Short name:<% $row->{'desc'} |h %>
Expires:<% - expirestime2show(expires2timet($row->{'expires'})) - |h %>
Used for:<% $rowi->{'emailaddr'} |h %>
Subject:<% $row->{'subject'} |h %>
-

+ +<& txtable, tx => $row &> +%# $sthi->execute($row->{'textid'}); +% # while (my $rowi= $sthi->fetchrow_hashref()) { +%#Used for:<% $rowi->{'emailaddr'} |h %> +%# } +%#

 <% $row->{'text'} |h %>
 
+ % }