-<TD ALIGN="LEFT"><b><%$Transaction->CreatorObj->Name%> - <%$TicketString%> <%$desc%>
-
-</b></TD>
-<TD><%$TimeTaken%> </TD>
-<TD ALIGN="RIGHT"><font size=-1><%$titlebar_commands|n%></font></TD>
-</TR>
-<%PERL>
-
-unless ($Collapsed) {
- $attachments->GotoFirstItem;
- while (my $message=$attachments->Next) {
- #we don't want to show any empty transactions, unless they have kids
- next unless ($message->ContentLength || $message->Children->Count);
-
- my ($headers, $quoted);
- if ($ShowHeaders && ($ShowHeaders == $Ticket->Id)) {
- $headers = $message->Headers;
- } else {
- $headers = $message->NiceHeaders;
- }
- chomp $headers;
- if ($headers) {
- # localize the common headers (like 'Subject:'), too.
- eval {$headers =~ s/^([^:]+)(?=:)/loc($1)/em; } # we eval here to catch errors when 5.6 panics
- }
- # 13456 is a random # of about the biggest size we want to see inline text
- my $MAX_INLINE_BODY = 13456;
- if ($message->ContentType =~ m{^(text/plain|message|text$)}i &&
- $message->ContentLength < $MAX_INLINE_BODY ) {
- require Text::Quoted;
- $quoted = Text::Quoted::extract($message->Content);
- }
-
-</%PERL>
-<TR class="<% $RowNum%2 ? 'oddline' : 'evenline'%>" >
- <TD BGCOLOR="<%$bgcolor%>"> </TD>
- <TD> </TD>
- <TD COLSPAN=3 VALIGN=TOP>
-<span class="message">
- <PRE>
-<& ShowMessageHeaders, Headers => $headers, Transaction => $Transaction &>
-</PRE>
-<& ShowMessageStanza, Depth => 0, Message => $quoted, Transaction => $Transaction &>
-</span>
- </TD>
- <TD VALIGN=TOP ALIGN=RIGHT>
-
-% if ($message->Parent == 0 ) {
-<BR>
+ <td class="description">
+ <%$Transaction->CreatorObj->Name%> - <%$TicketString%> <%$desc%>
+ </td>
+ <td class="time-taken"><%$TimeTaken%></td>
+ <td class="actions"><%$titlebar_commands|n%></td>
+ </tr>
+
+ <tr>
+ <td colspan="4" class="content">
+% if ($Transaction->CustomFieldValues->Count) {
+ <& /Elements/ShowCustomFields, Object => $Transaction &>