small formatting updates to RADIUS report

diff --git a/httemplate/search/sqlradius.cgi b/httemplate/search/sqlradius.cgi
index 3c5046b..9cc5958 100644 (file)
--- a/httemplate/search/sqlradius.cgi
+++ b/httemplate/search/sqlradius.cgi
@@ -123,9 +123,9 @@
 
   my $time_format = sub {
     my $time = shift;
-    $time > 0
-      ? time2str('%T%P %a %b %o %Y', $time )
-      : ' ';
+    return ' ' if $time == 0;
+    my $pretty = time2str('%T%P %a %b %o %Y', $time );
+    $pretty =~ s/ (\d)(st|dn|rd|th)/ $1$2/;
   };
 
   my $duration_format = sub {
@@ -223,7 +223,7 @@
   <% foreach my $field ( keys %fields ) { %>
     <TH>
       <%= $fields{$field}->{name} %><BR>
-      <FONT SIZE=-1><%= $fields{$field}->{attrib} %></FONT>
+      <FONT SIZE=-2><%= $fields{$field}->{attrib} %></FONT>
     </TH>
   <% } %>
 </TR>