import rt 3.4.6

[freeside.git] / rt / html / Ticket / Elements / ShowHistory

diff --git a/rt/html/Ticket/Elements/ShowHistory b/rt/html/Ticket/Elements/ShowHistory
index 45cd512..878e253 100644 (file)
--- a/rt/html/Ticket/Elements/ShowHistory
+++ b/rt/html/Ticket/Elements/ShowHistory
@@ -2,7 +2,7 @@
 %# 
 %# COPYRIGHT:
 %#  
-%# This software is Copyright (c) 1996-2007 Best Practical Solutions, LLC 
+%# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC 
 %#                                          <jesse@bestpractical.com>
 %# 
 %# (Except where explicitly superseded by other copyright notices)
@@ -22,9 +22,7 @@
 %# 
 %# You should have received a copy of the GNU General Public License
 %# along with this program; if not, write to the Free Software
-%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
-%# 02110-1301 or visit their web page on the internet at
-%# http://www.gnu.org/copyleft/gpl.html.
+%# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 %# 
 %# 
 %# CONTRIBUTION SUBMISSION POLICY:
@@ -45,45 +43,47 @@
 %# those contributions and any derivatives thereof.
 %# 
 %# END BPS TAGGED BLOCK }}}
-<%doc>
-#   This is (ab)used in Admin/(Users|Groups)/History.html and should probably
-#   be generalized at some point.
-</%doc>
 <%perl>
-if ($ShowDisplayModes or $ShowTitle) {
-    my $title = $ShowTitle
-                    ? loc('History')
-                    : '&nbsp;';
-
-    my $titleright;
-
-    if ($ShowDisplayModes) {
-        $titleright = q[<span style="color: black">] . loc('Display mode') . ':</span> ';
-        
-        if ($ShowHeaders) {
-            $titleright .= qq{<a href="$URIFile?id=} .
-                           $Ticket->id.qq{">} .
-                           loc("Brief headers") .
-                           qq{</a> &mdash; };
-            $titleright .= q[<span class="selected">] . loc("Full headers") . "</span>";
-        }
-        else {
-            $titleright .= q[<span class="selected">] . loc("Brief headers") . "</span> &mdash; ";
-            $titleright .= qq{<a href="$URIFile?ShowHeaders=1;id=} .
-                           $Ticket->id.qq{">} .
-                           loc("Full headers") .
-                           qq{</a>};
-        }
-    }
+ if ($ShowDisplayModes or $ShowTitle) {
+my $title;
+my $titleright;
+if ($ShowTitle) {
+    $title = loc('History');
+}
+else {
+    $title = '&nbsp;';
+}
+$titleright = loc('Display mode') . ":";
+if ($ShowHeaders) {
+    $titleright .= "[<A HREF=\"" . $URIFile . "?id="
+      . $Ticket->id . "\">"
+      . loc("Brief headers")
+      . "</a>] <b>["
+      . loc("Full headers") . "]</b>";
+}
+else {
+    $titleright .= "<b>["
+      . loc("Brief headers")
+      . "]</b> [<A HREF=\""
+      . $URIFile
+      . "?ShowHeaders=1"
+      . "&id="
+      . $Ticket->id . "\">"
+      . loc("Full headers") . "</a>]";
+}
 </%perl>
-<& /Widgets/TitleBoxStart, title => $title, titleright => $titleright &>
+<& /Elements/TitleBoxStart, title => $title, titleright => $titleright, bodyclass=> ''&>
 % }
 
-<div id="ticket-history">
+<TABLE WIDTH=100% CELLSPACING=0 CELLPADDING=2 BORDER=0>
 <%perl>
 my @attachments = @{$Attachments->ItemsArrayRef()};
 my @attachment_content = @{$AttachmentContent->ItemsArrayRef()};
 
+
+
+
+
 while ( my $Transaction = $Transactions->Next ) {
     my $skip = 0;
     $m->comp( '/Elements/Callback',
@@ -123,9 +123,9 @@ $m->flush_buffer();
 }
 
 </%perl>
-</div>
+</TABLE>
 % if ($ShowDisplayModes or $ShowTitle) {
-<& /Widgets/TitleBoxEnd &>
+<& /Elements/TitleBoxEnd &>
 % }
 <%INIT>
 my $Transactions = new RT::Transactions($session{'CurrentUser'});