From df48356d49c79a75ef5886a04b7fb599807e38a8 Mon Sep 17 00:00:00 2001 From: cvs2git Date: Mon, 18 Apr 2011 23:15:20 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'RT_3_8_10'. --- rt/html/SelfService/Create.html | 177 ---------------------------------------- 1 file changed, 177 deletions(-) delete mode 100644 rt/html/SelfService/Create.html (limited to 'rt/html/SelfService/Create.html') diff --git a/rt/html/SelfService/Create.html b/rt/html/SelfService/Create.html deleted file mode 100644 index 9a64b5fd9..000000000 --- a/rt/html/SelfService/Create.html +++ /dev/null @@ -1,177 +0,0 @@ -%# BEGIN BPS TAGGED BLOCK {{{ -%# -%# COPYRIGHT: -%# -%# This software is Copyright (c) 1996-2009 Best Practical Solutions, LLC -%# -%# -%# (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 }}} -<& Elements/Header, Title => loc("Create a ticket") &> - -<& /Elements/ListActions, actions => \@results &> - -
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
<&|/l&>Queue: - - <% $queue_obj->Name %> (<%$queue_obj->Description || ''%>) -
<&|/l&>Requestors: - -
<&|/l&>Cc: - -
<&|/l&>Subject: - -
- <& /Ticket/Elements/EditCustomFields, QueueObj => $queue_obj &> -
<&|/l&>Attach file: - -
-<&|/l&>Describe the issue below:
-% if (exists $ARGS{Content}) { -<& /Elements/MessageBox, Default => $ARGS{Content}, IncludeSignature => 0 &> -% } else { -<& /Elements/MessageBox &> -% } -
-<& /Elements/Submit, Label => loc("Create ticket")&> - - -
-<%args> -$Queue => undef - -<%init> -my $queue_obj = RT::Queue->new($session{'CurrentUser'}); -$queue_obj->Load($Queue) || Abort(loc("Queue could not be loaded.")); -$queue_obj->Disabled && Abort(loc("Cannot create tickets in a disabled queue.")); - -my ($checks_failure, $skip_create, @results) = (0, 0, ()); -$skip_create = 1 unless ($ARGS{'id'}||'') eq 'new'; - -$m->comp('/Elements/Callback', - QueueObj => $queue_obj, ARGSRef => \%ARGS, - skip_create => \$skip_create, checks_failure => \$checks_failure, - results => \@results -); - -$skip_create = 1 if exists $ARGS{'AddMoreAttach'}; - -# deal with deleting uploaded attachments -foreach my $key (keys %ARGS) { - if ($key =~ m/^DeleteAttach-(.+)$/) { - delete $session{'Attachments'}{$1}; - } - $session{'Attachments'} = { %{$session{'Attachments'} || {}} }; -} - -# store the uploaded attachment in session -if ( $ARGS{'Attach'} ) { # attachment? - $session{'Attachments'} = {} unless defined $session{'Attachments'}; - - my $subject = "$ARGS{'Attach'}"; - - # strip leading directories - $subject =~ s#^.*[\\/]##; - - my $attachment = MakeMIMEEntity( - Subject => $subject, - Body => "", - AttachmentFieldName => 'Attach' - ); - - $session{'Attachments'} = { %{$session{'Attachments'} || {}}, - $ARGS{'Attach'} => $attachment }; -} - -unless (keys %{$session{'Attachments'}} and $ARGS{'id'} eq 'new') { - delete $session{'Attachments'}; -} - -my $CFs = $queue_obj->TicketCustomFields; -my $ValidCFs = $m->comp( - '/Elements/ValidateCustomFields', - CustomFields => $CFs, - ARGSRef => \%ARGS -); -unless ( $ValidCFs ) { - $checks_failure = 1; - while ( my $CF = $CFs->Next ) { - my $msg = $m->notes('InvalidField-' . $CF->Id) or next; - push @results, $CF->Name . ': ' . $msg - if ($ARGS{'id'}||'') eq 'new'; - } -} - -if ( !$checks_failure && !$skip_create ) { - $m->comp('Display.html', %ARGS); - $RT::Logger->crit("After display call; error is $@"); - $m->abort(); -} - -- cgit v1.2.1