[Rt-commit] r18184 - in rt/3.999/branches/merge_to_3.8.2: share/html/Ticket/Elements

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Wed Feb  4 06:27:54 2009
New Revision: 18184

Modified:
   rt/3.999/branches/merge_to_3.8.2/   (props changed)
   rt/3.999/branches/merge_to_3.8.2/share/html/Ticket/Elements/ShowMessageHeaders

Log:
 r19539 at sunnavys-mb:  sunnavy | 2009-02-04 19:18:34 +0800
 case fix


Modified: rt/3.999/branches/merge_to_3.8.2/share/html/Ticket/Elements/ShowMessageHeaders
==============================================================================
--- rt/3.999/branches/merge_to_3.8.2/share/html/Ticket/Elements/ShowMessageHeaders	(original)
+++ rt/3.999/branches/merge_to_3.8.2/share/html/Ticket/Elements/ShowMessageHeaders	Wed Feb  4 06:27:54 2009
@@ -49,8 +49,8 @@
 <table>
 % foreach my $header (@headers) {
   <tr>
-    <td align="right" class="message-header-key"><% $header->{'Tag'} %>:</td>
-    <td class="message-header-value"><% $header->{'Value'} | n %></td>
+    <td align="right" class="message-header-key"><% $header->{'tag'} %>:</td>
+    <td class="message-header-value"><% $header->{'value'} | n %></td>
   </tr>
 % }
 </table>
@@ -60,7 +60,7 @@
 foreach my $field( RT->config->get('ShowBccHeader')? $message->_split_headers : $message->split_headers ) {
     my ($tag, $value) = split /:/, $field, 2;
     next unless $tag && $value;
-    push @headers, { Tag => $tag, value => $value };
+    push @headers, { tag => $tag, value => $value };
 }
 
 my %display_headers = map { lc($_) => 1 } @display_headers;
@@ -72,16 +72,16 @@
 );
 
 unless ( $display_headers{'_all'} ) {
-    @headers = grep $display_headers{ lc $_->{'Tag'} }, @headers;
+    @headers = grep $display_headers{ lc $_->{'tag'} }, @headers;
 }
 
 my $ticket = $message->transaction_obj->ticket_obj;
 foreach my $f (@headers) {
-    $m->comp('/Elements/MakeClicky', content => \$f->{'Value'}, ticket => $ticket, %ARGS);
+    $m->comp('/Elements/MakeClicky', content => \$f->{'value'}, ticket => $ticket, %ARGS);
 }
 
 if ( $localize ) {
-    $_->{'Tag'} = _($_->{'Tag'}) foreach @headers;
+    $_->{'tag'} = _($_->{'tag'}) foreach @headers;
 }
 </%INIT>
 <%ARGS>