X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcgp_rule_condition.pm;h=02ea1729dbeea92e0267925bd61172e378b9d4a0;hb=7b125e587a4d1ee0aca692e23ea7897f671855ae;hp=cfb671063ccb10d22d30cf43b936d56c3830cfb1;hpb=624b2d44625f69d71175c3348cae635d580c890b;p=freeside.git diff --git a/FS/FS/cgp_rule_condition.pm b/FS/FS/cgp_rule_condition.pm index cfb671063..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 @@ -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