[Rt-commit] r4249 - in rtir/branches/1.9-EXPERIMENTAL: . lib/RT/Action

ruz at bestpractical.com ruz at bestpractical.com
Sun Dec 4 19:10:06 EST 2005


Author: ruz
Date: Sun Dec  4 19:10:05 2005
New Revision: 4249

Modified:
   rtir/branches/1.9-EXPERIMENTAL/   (props changed)
   rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_SetStartsToNow.pm
Log:
 r428 at cubic-pc:  cubic | 2005-12-05 03:09:11 +0300
  r407 at cubic-pc:  cubic | 2005-12-05 03:06:35 +0300
  * minor
 


Modified: rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_SetStartsToNow.pm
==============================================================================
--- rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_SetStartsToNow.pm	(original)
+++ rtir/branches/1.9-EXPERIMENTAL/lib/RT/Action/RTIR_SetStartsToNow.pm	Sun Dec  4 19:10:05 2005
@@ -46,9 +46,7 @@
 #
 package RT::Action::RTIR_SetStartsToNow;
 
-
 use strict;
-
 use base 'RT::Action::RTIR';
 
 =head2 Prepare
@@ -57,25 +55,21 @@
 
 =cut
 
-
 sub Prepare {
     my $self = shift;
 
     # if triggered by a "Set Starts" transaction, return 0
     if ($self->TransactionObj->Type eq 'Set' &&
-	$self->TransactionObj->Field eq 'Starts') {
-	return 0;
+        $self->TransactionObj->Field eq 'Starts')
+    {
+        return 0;
     }
 
     # set if the Starts value isn't already set
-    if ($self->TicketObj->StartsObj->Unix < 0) {
-	return 1;
-    } else {
-	return 0;
-    }
-}
+    return 0 if $self->TicketObj->StartsObj->Unix > 0;
 
-# {{{ sub Commit
+    return 1;
+}
 
 =head2 Commit
 
@@ -93,8 +87,6 @@
     return 1;
 }
 
-# }}}
-
 eval "require RT::Action::RTIR_SetStartsToNow_Vendor";
 die $@ if ($@ && $@ !~ qr{^Can't locate RT/Action/RTIR_SetStartsToNow_Vendor.pm});
 eval "require RT::Action::RTIR_SetStartsToNow_Local";


More information about the Rt-commit mailing list