[freeside-commits] freeside/rt/lib/RT Action.pm, 1.1.1.1, 1.1.1.1.4.1 Condition.pm, 1.1.1.1, 1.1.1.1.4.1 Scrip_Overlay.pm, 1.1.1.11, 1.1.1.11.4.1

[Mark Wells]

Update of /home/cvs/cvsroot/freeside/rt/lib/RT
In directory wavetail.420.am:/tmp/cvs-serv30035/lib/RT

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	Action.pm Condition.pm Scrip_Overlay.pm 
Log Message:
create ticket on custom field change, RT#10139

Index: Action.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/lib/RT/Action.pm,v
retrieving revision 1.1.1.1
retrieving revision 1.1.1.1.4.1
diff -u -w -d -r1.1.1.1 -r1.1.1.1.4.1
--- Action.pm	31 Dec 2009 13:10:08 -0000	1.1.1.1
+++ Action.pm	17 Nov 2010 21:26:40 -0000	1.1.1.1.4.1
@@ -204,6 +204,17 @@
 }
 # }}}
 
+sub Options {
+  my $self = shift;
+  return();
+}
+
+sub Rules {
+  my $self = shift;
+  return () if !$self->ScripObj or !$self->ScripObj->ActionRules;
+  return(split "\n", $self->ScripObj->ActionRules);
+}
+
 # {{{ sub DESTROY
 sub DESTROY {
     my $self = shift;

Index: Condition.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/lib/RT/Condition.pm,v
retrieving revision 1.1.1.1
retrieving revision 1.1.1.1.4.1
diff -u -w -d -r1.1.1.1 -r1.1.1.1.4.1
--- Condition.pm	31 Dec 2009 13:10:15 -0000	1.1.1.1
+++ Condition.pm	17 Nov 2010 21:26:40 -0000	1.1.1.1.4.1
@@ -210,6 +210,19 @@
 }
 # }}}
 
+sub Options {
+  my $self = shift;
+  return();
+}
+
+sub Rules {
+  my $self = shift;
+  return () if !$self->ScripObj or !$self->ScripObj->ConditionRules;
+  # By default, option names and values are on consecutive lines.
+  # Override this if you need anything more interesting.
+  return(split "\n", $self->ScripObj->ConditionRules);
+}
+
 # {{{ sub DESTROY
 sub DESTROY {
     my $self = shift;

Index: Scrip_Overlay.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/lib/RT/Scrip_Overlay.pm,v
retrieving revision 1.1.1.11
retrieving revision 1.1.1.11.4.1
diff -u -w -d -r1.1.1.11 -r1.1.1.11.4.1
--- Scrip_Overlay.pm	18 May 2010 18:41:15 -0000	1.1.1.11
+++ Scrip_Overlay.pm	17 Nov 2010 21:26:40 -0000	1.1.1.11.4.1
@@ -103,6 +103,8 @@
         CustomPrepareCode      => undef,
         CustomCommitCode       => undef,
         CustomIsApplicableCode => undef,
+        ConditionRules         => undef,
+        ActionRules            => undef,
         @_
     );
 
@@ -162,6 +164,8 @@
         CustomPrepareCode      => $args{'CustomPrepareCode'},
         CustomCommitCode       => $args{'CustomCommitCode'},
         CustomIsApplicableCode => $args{'CustomIsApplicableCode'},
+        ConditionRules         => $args{'ConditionRules'},
+        ActionRules            => $args{'ActionRules'},
     );
     if ( $id ) {
         return ( $id, $self->loc('Scrip Created') );