X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fcgp_rule_condition.pm;h=02ea1729dbeea92e0267925bd61172e378b9d4a0;hb=7b125e587a4d1ee0aca692e23ea7897f671855ae;hp=f91b3e6f614fb6917f321b5284577ee1d6a880d4;hpb=37591b61f8ad6fc5c5acb2fd8f520d2dbe4f1539;p=freeside.git diff --git a/FS/FS/cgp_rule_condition.pm b/FS/FS/cgp_rule_condition.pm index f91b3e6f6..02ea1729d 100644 --- a/FS/FS/cgp_rule_condition.pm +++ b/FS/FS/cgp_rule_condition.pm @@ -52,7 +52,6 @@ params rulenum - =back =head1 METHODS @@ -115,8 +114,8 @@ sub check { my $error = $self->ut_numbern('ruleconditionnum') || $self->ut_text('condition') - || $self->ut_text('op') - || $self->ut_text('params') + || $self->ut_textn('op') + || $self->ut_textn('params') || $self->ut_foreign_key('rulenum', 'cgp_rule', 'rulenum') ; return $error if $error; @@ -124,6 +123,17 @@ sub check { $self->SUPER::check; } +=item arrayref + +Returns an array reference of the condition, op and params fields. + +=cut + +sub arrayref { + my $self = shift; + [ map $self->$_, qw( condition op params ) ]; +} + =back =head1 BUGS