diff options
author | cvs2git <cvs2git> | 2004-04-07 09:08:35 +0000 |
---|---|---|
committer | cvs2git <cvs2git> | 2004-04-07 09:08:35 +0000 |
commit | 022491d9d2723ca4d7d0718cdb1fd67e7652428e (patch) | |
tree | fc1e50c0d78ecc401ef2214a6a11ee07242be0f8 /rt/lib/RT/Action/AutoOpen.pm | |
parent | 35effa1bf4ac902547615c816960bbc8db8e7256 (diff) |
This commit was manufactured by cvs2svn to create tag 'NET_WHOIS_RAW_0_31'.NET_WHOIS_RAW_0_31
Diffstat (limited to 'rt/lib/RT/Action/AutoOpen.pm')
-rw-r--r-- | rt/lib/RT/Action/AutoOpen.pm | 86 |
1 files changed, 0 insertions, 86 deletions
diff --git a/rt/lib/RT/Action/AutoOpen.pm b/rt/lib/RT/Action/AutoOpen.pm deleted file mode 100644 index 7c8c2b89d..000000000 --- a/rt/lib/RT/Action/AutoOpen.pm +++ /dev/null @@ -1,86 +0,0 @@ -# BEGIN LICENSE BLOCK -# -# Copyright (c) 1996-2003 Jesse Vincent <jesse@bestpractical.com> -# -# (Except where explictly superceded by other copyright notices) -# -# 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. -# -# Unless otherwise specified, all modifications, corrections or -# extensions to this work which alter its source code become the -# property of Best Practical Solutions, LLC when submitted for -# inclusion in the work. -# -# -# END LICENSE BLOCK -# This Action will open the BASE if a dependent is resolved. - -package RT::Action::AutoOpen; -require RT::Action::Generic; - -use strict; -use vars qw/@ISA/; -@ISA=qw(RT::Action::Generic); - -#Do what we need to do and send it out. - -#What does this type of Action does - -# {{{ sub Describe -sub Describe { - my $self = shift; - return (ref $self ); -} -# }}} - - -# {{{ sub Prepare -sub Prepare { - my $self = shift; - - # if the ticket is already open or the ticket is new and the message is more mail from the - # requestor, don't reopen it. - - if ( ( $self->TicketObj->Status eq 'open' ) - || ( ( $self->TicketObj->Status eq 'new' ) - && $self->TransactionObj->IsInbound ) - ) { - - return undef; - } - else { - return (1); - } -} -# }}} - -sub Commit { - my $self = shift; - my $oldstatus = $self->TicketObj->Status(); - $self->TicketObj->__Set( Field => 'Status', Value => 'open' ); - $self->TicketObj->_NewTransaction( - Type => 'Status', - Field => 'Status', - OldValue => $oldstatus, - NewValue => 'open', - Data => 'Ticket auto-opened on incoming correspondence' - ); - - - return(1); -} - -eval "require RT::Action::AutoOpen_Vendor"; -die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/AutoOpen_Vendor.pm}); -eval "require RT::Action::AutoOpen_Local"; -die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/AutoOpen_Local.pm}); - -1; |