RT 4.2.11, ticket#13852

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

diff --git a/rt/share/html/Ticket/Elements/ShowHistory b/rt/share/html/Ticket/Elements/ShowHistory
deleted file mode 100755 (executable)
index 835b66d..0000000
--- a/rt/share/html/Ticket/Elements/ShowHistory
+++ /dev/null
@@ -1,161 +0,0 @@
-%# BEGIN BPS TAGGED BLOCK {{{
-%#
-%# COPYRIGHT:
-%#
-%# This software is Copyright (c) 1996-2015 Best Practical Solutions, LLC
-%#                                          <sales@bestpractical.com>
-%#
-%# (Except where explicitly superseded by other copyright notices)
-%#
-%#
-%# LICENSE:
-%#
-%# This work is made available to you under the terms of Version 2 of
-%# the GNU General Public License. A copy of that license should have
-%# been provided with this software, but in any event can be snarfed
-%# from www.gnu.org.
-%#
-%# This work is distributed in the hope that it will be useful, but
-%# WITHOUT ANY WARRANTY; without even the implied warranty of
-%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-%# General Public License for more details.
-%#
-%# 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/licenses/old-licenses/gpl-2.0.html.
-%#
-%#
-%# CONTRIBUTION SUBMISSION POLICY:
-%#
-%# (The following paragraph is not intended to limit the rights granted
-%# to you to modify and distribute this software under the terms of
-%# the GNU General Public License and is only of importance to you if
-%# you choose to contribute your changes and enhancements to the
-%# community by submitting them to Best Practical Solutions, LLC.)
-%#
-%# By intentionally submitting any modifications, corrections or
-%# derivatives to this work, or any other work intended for use with
-%# Request Tracker, to Best Practical Solutions, LLC, you confirm that
-%# you are the copyright holder for those contributions and you grant
-%# Best Practical Solutions,  LLC a nonexclusive, worldwide, irrevocable,
-%# royalty-free, perpetual, license to use, copy, create derivative
-%# works based on those contributions, and sublicense and distribute
-%# 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 = '';
-        
-        my $open_all  = $m->interp->apply_escapes( loc("Show all quoted text"), 'j' );
-        my $open_html = $m->interp->apply_escapes( loc("Show all quoted text"), 'h' );
-        my $close_all = $m->interp->apply_escapes( loc("Hide all quoted text"), 'j' );
-        $titleright .=    '<a href="#" data-direction="open" '
-                        . qq{onclick="return toggle_all_folds(this, $open_all, $close_all);"}
-                        . ">$open_html</a> &mdash; ";
-
-        if ($ShowHeaders) {
-            $titleright .= qq{<a href="$URIFile?id=} .
-                           $Ticket->id.qq{">} .
-                           loc("Show brief headers") .
-                           qq{</a>};
-        } else {
-            $titleright .= qq{<a href="$URIFile?ShowHeaders=1;id=} .
-                           $Ticket->id.qq{">} .
-                           loc("Show full headers") .
-                           qq{</a>};
-        }
-    }
-</%perl>
-<div class="history">
-<& /Widgets/TitleBoxStart, title => $title, titleright_raw => $titleright &>
-% }
-<div id="ticket-history">
-<%perl>
-my $trans_content = {};
-my $trans_attachments = {};
-
-for my $content (@{$AttachmentContent->ItemsArrayRef()}) {
-    $trans_content->{$content->TransactionId}->{$content->Id} = $content;
-}
-
-for my $attachment (@{$Attachments->ItemsArrayRef()}) {
-    push (@{$trans_attachments->{$attachment->TransactionId}}, $attachment)
-}
-
-while ( my $Transaction = $Transactions->Next ) {
-    my $skip = 0;
-    $m->callback(
-        %ARGS,
-        Transaction   => $Transaction,
-        skip          => \$skip,
-        CallbackName  => 'SkipTransaction',
-    );
-    next if $skip;
-
-    $i++;
-
-    my $IsLastTransaction = 0;
-    if ( RT->Config->Get( 'OldestTransactionsFirst', $session{'CurrentUser'} )){
-        $IsLastTransaction = $Transactions->IsLast;
-    } else {
-        $IsLastTransaction = 1 if ( $i == 1 );
-    }
-
-    #Args is first because we're clobbering the "Attachments" parameter 
-    $m->comp( 'ShowTransaction',
-            %ARGS,
-
-              Ticket               => $Ticket,
-              Transaction          => $Transaction,
-              ShowHeaders          => $ShowHeaders,
-              RowNum               => $i,
-              Attachments          => $trans_attachments->{$Transaction->id},
-              AttachmentContent    => $trans_content,
-              LastTransaction      => $IsLastTransaction
- );
-
-# manually flush the content buffer after each txn, so the user sees
-# some update
-$m->flush_buffer(); 
-}
-
-</%perl>
-</div>
-% if ($ShowDisplayModes or $ShowTitle) {
-<& /Widgets/TitleBoxEnd &>
-</div>
-% }
-<%INIT>
-
-my $i;
-$Transactions ||= $m->comp('/Ticket/Elements/FindTransactions',Ticket => $Ticket, Tickets => $Tickets || undef);
-$Attachments ||=  $m->comp('/Ticket/Elements/FindAttachments', Ticket => $Ticket, Tickets => $Tickets || undef);
-$AttachmentContent ||= $m->comp('/Ticket/Elements/LoadTextAttachments', Ticket => $Ticket);
-
-</%INIT>
-<%ARGS>
-$URIFile => RT->Config->Get('WebPath')."/Ticket/Display.html"
-$Ticket => undef
-$Tickets => undef
-$Transactions => undef
-$Attachments => undef
-$AttachmentContent => undef
-$ShowHeaders => undef
-$ShowTitle => 1
-$ShowDisplayModes => 1
-$WarnUnsigned => undef
-</%ARGS>