Merge branch 'master' of https://github.com/jgoodman/Freeside

[freeside.git] / rt / lib / RT / Action / EscalatePriority.pm

diff --git a/rt/lib/RT/Action/EscalatePriority.pm b/rt/lib/RT/Action/EscalatePriority.pm
index e15e50c..38cad94 100644 (file)
--- a/rt/lib/RT/Action/EscalatePriority.pm
+++ b/rt/lib/RT/Action/EscalatePriority.pm
@@ -2,7 +2,7 @@
 #
 # COPYRIGHT:
 #
 #
 # COPYRIGHT:
 #

-# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC
+# This software is Copyright (c) 1996-2014 Best Practical Solutions, LLC

 #                                          <sales@bestpractical.com>
 #
 # (Except where explicitly superseded by other copyright notices)
 #                                          <sales@bestpractical.com>
 #
 # (Except where explicitly superseded by other copyright notices)


@@ -67,6 +67,9 @@ to final priority.
 In this way, priority is either increased or decreased toward the final priority
 as the ticket heads toward its due date.
 
 In this way, priority is either increased or decreased toward the final priority
 as the ticket heads toward its due date.
 

+Alternately, if you don't set a due date, the Priority will be incremented by 1
+until it reaches the Final Priority.  If a ticket without a due date has a Priority
+greater than Final Priority, it will be decremented by 1.

 
 =cut
 
 
 =cut
 


@@ -75,20 +78,18 @@ package RT::Action::EscalatePriority;
 use base 'RT::Action';
 
 use strict;
 use base 'RT::Action';
 
 use strict;

+use warnings;

 
 #Do what we need to do and send it out.
 
 #What does this type of Action does
 
 
 #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 . " will move a ticket's priority toward its final priority.");
 }
 sub Describe  {
   my $self = shift;
   return (ref $self . " will move a ticket's priority toward its final priority.");
 }

-# }}}

        
 
        
 

-# {{{ sub Prepare 

 sub Prepare  {
     my $self = shift;
     
 sub Prepare  {
     my $self = shift;
     


@@ -152,7 +153,6 @@ sub Prepare  {
     }
     return 1;
 }
     }
     return 1;
 }

-# }}}

 
 sub Commit {
     my $self = shift;
 
 sub Commit {
     my $self = shift;