[Rt-commit] r4250 - in rtir/branches/1.9-EXPERIMENTAL: .
lib/RT/Action
ruz at bestpractical.com
ruz at bestpractical.com
Sun Dec 4 19:10:17 EST 2005
Author: ruz
Date: Sun Dec 4 19:10:17 2005
New Revision: 4250
Modified:
rtir/branches/1.9-EXPERIMENTAL/ (props changed)
rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_UnsetDue.pm
Log:
r429 at cubic-pc: cubic | 2005-12-05 03:09:11 +0300
r408 at cubic-pc: cubic | 2005-12-05 03:08:24 +0300
* minor
Modified: rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_UnsetDue.pm
==============================================================================
--- rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_UnsetDue.pm (original)
+++ rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_UnsetDue.pm Sun Dec 4 19:10:17 2005
@@ -46,9 +46,7 @@
#
package RT::Action::RTIR_UnsetDue;
-
use strict;
-
use base 'RT::Action::RTIR';
=head2 Prepare
@@ -57,15 +55,12 @@
=cut
-
sub Prepare {
my $self = shift;
return 1;
}
-# {{{ sub Commit
-
=head2 Commit
Set the Due date accordingly.
@@ -76,15 +71,12 @@
my $self = shift;
my $date = RT::Date->new($RT::SystemUser);
-
$date->Set(Format => 'unix', Value=> 0);
- $self->TicketObj->SetDue($date->ISO);
+ $self->TicketObj->SetDue( $date->ISO );
return 1;
}
-# }}}
-
eval "require RT::Action::RTIR_UnsetDue_Vendor";
die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/RTIR_UnsetDue_Vendor.pm});
eval "require RT::Action::RTIR_UnsetDue_Local";
More information about the Rt-commit
mailing list