From ded0451e9582df33cae6099a2fb72b4ea25076cf Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 15 Jul 2003 13:30:43 +0000
Subject: reverting to vendor branch rt 3.0.4, hopefully

---
 rt/webrt/SelfService/Display.html | 190 --------------------------------------
 1 file changed, 190 deletions(-)
 delete mode 100755 rt/webrt/SelfService/Display.html

(limited to 'rt/webrt/SelfService/Display.html')

diff --git a/rt/webrt/SelfService/Display.html b/rt/webrt/SelfService/Display.html
deleted file mode 100755
index 2d44f148e..000000000
--- a/rt/webrt/SelfService/Display.html
+++ /dev/null
@@ -1,190 +0,0 @@
-%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/SelfService/Attic/Display.html,v 1.1 2002-08-12 06:17:09 ivan Exp $
-%# Copyright 1996-2001 Jesse Vincent <jesse@fsck.com>
-
-<& /SelfService/Elements/Header, Title => 'Display ticket #'.$Ticket->id &>
-
-
-<& /Elements/ListActions, actions => \@results &>
-
-<TABLE>
-    <TR>
-	<TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Ticket Id
-	</TD>
-      <TD>
-	<%$Ticket->Id%>
-	</TD>
-      </TR>
-    <TR>	
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Requestors
-	</TD>
-      <TD>
-	<%$Ticket->RequestorsAsString%>
-      </TD>
-      </TR>
-    <TR>	
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Cc
-	</TD>
-      <TD>
-	<%$Ticket->CcAsString%>
-      </TD>
-    </TR>
-
-  <TR>	
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Status
-	</TD>
-      <TD>
-	<%$Ticket->Status%>
-      </TD>
-    </TR>
-
-    <TR>	
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Queue
-	</TD>
-      <TD>
-	<%$Ticket->QueueObj->Name%> (<%$Ticket->QueueObj->Description%>)
-      </TD>
-    </TR>
-    <TR>	
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Priority
-      </TD>
-      <TD>
-	<%$Ticket->Priority %>
-      </TD>
-    </TR>
- 
-%  if ($Ticket->TimeWorked) {
-   <TR>	
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	Worked
-      </TD>
-      <TD>
-	<%$Ticket->TimeWorked %> minutes
-      </TD>
-    </TR>
-% }
-    
-% my $selects = $Ticket->QueueObj->KeywordSelects;
-% while (my $select = $selects->Next) {
-    <TR>
-      <TD VALIGN=TOP WIDTH="20%" ALIGN=RIGHT>
-	<%$select->Name%>
-      </TD>
-      <TD>
-% my $object_keywords = $Ticket->KeywordsObj($select->id);	
-% while (my $keyword = $object_keywords->Next) {
-	<%$keyword->KeywordObj->RelativePath($select->KeywordObj)%>
-% }
-%}
-	</TD>
-      </TR>
-
-
-
-
-	</TABLE>
-<TABLE BORDER=0 CELLSPACING=0>
-% my ($i);
-%while (my $Transaction = $Transactions->Next) {
-% $i++;
-%	if ($Transactions->IsLast) {
-	<a name="lasttrans"></a>
-% 	}
-	<& /Ticket/Elements/ShowTransaction, Transaction => $Transaction, 
-					     RowNum => $i,
-					     Ticket => $Ticket &>
-
-%}
-</TABLE>
-
-
-<%INIT>
-
-my ($field, @results);
-
-# {{{ Load the ticket
-#If we get handed two ids, mason will make them an array. bleck.
-# We want teh first one. Just because there's no other sensible way
-# to deal
-my @id = (ref $id eq 'ARRAY') ? @{$id} : ($id);                
-
-
-my $Ticket = new RT::Ticket($session{'CurrentUser'});
-if ($id[0] eq 'new') {
-    # {{{ Create a new ticket
-    
-    my $Queue = new RT::Queue($session{'CurrentUser'});	
-    unless ($Queue->Load($ARGS{'Queue'})) {
-	$m->comp('Error.html', Why => 'Queue not found');
-	$m->abort;
-    }
-    
-    unless ($Queue->CurrentUserHasRight('CreateTicket')) {
-	$m->comp('Error.html', Why => 'You have no permission to create tickets in that queue.');
-  	$m->abort; 
-    }
-    
-    my @Requestors = split(/,/,$ARGS{'Requestors'});
-    my @Cc = split(/,/,$ARGS{'Cc'});
-    
-
-    my $MIMEObj = MakeMIMEEntity ( Subject => $ARGS{'Subject'},
-				   From => $ARGS{'From'},
-				   Cc => $ARGS{'Cc'},
-				   Body => $ARGS{'Content'},
-				   AttachmentFieldName => 'Attach');
-
-    #TODO in Create_Details.html: priorities and due-date      
-    my ($id, $Trans, $ErrMsg)= $Ticket->Create(Queue=>$ARGS{Queue},
-					       Requestor=> \@Requestors,
-					       Cc => \@Cc,
-					       Subject=>$ARGS{Subject},
-					       MIMEObj => $MIMEObj	  
-					      );         
-    unless ($id && $Trans) {
-	$m->comp('Error.html', Why => $ErrMsg);
-   	$m->abort(); 
-    }
-
-    push(@results, $ErrMsg);
-
-    # }}}
-}
-else {
-    unless ($Ticket->Load($id[0])) {
-	$m->comp('Error.html', Why =>"Couldn't load ticket '$id'");
-	$m->abort();
-    }
-}
-# }}}
-
-unless ($session{'CurrentUser'}->HasQueueRight ( TicketObj => $Ticket,
-						 Right => 'ShowTicket')) {
-    $m->comp('Error.html', Why => "No permission to display that ticket");
-    $m->abort();
-}
-
-my ($code, $msg);
-
-#Update the status
-if ((defined $ARGS{'Status'}) and 
-    ($ARGS{'Status'} ne $Ticket->Status)) {
-    ($code, $msg) = $Ticket->SetStatus($ARGS{'Status'});
-    push @results, "$msg";
-}
-
-ProcessUpdateMessage(ARGSRef=>\%ARGS, Actions=>\@results, TicketObj=>$Ticket);
-
-my $Transactions = $Ticket->Transactions;
-
-</%INIT>
-
-
-<%ARGS>
-$id => undef
-</%ARGS>
-- 
cgit v1.2.1