fix per-package class agent commission percentages, RT#23066

diff --git a/FS/FS/part_event/Action/Mixin/credit_agent_pkg_class.pm b/FS/FS/part_event/Action/Mixin/credit_agent_pkg_class.pm
index 33aeadd..cb61f1b 100644 (file)
--- a/FS/FS/part_event/Action/Mixin/credit_agent_pkg_class.pm
+++ b/FS/FS/part_event/Action/Mixin/credit_agent_pkg_class.pm
@@ -16,7 +16,7 @@ sub _calc_credit_percent {
 
   my $agent_pkg_class = qsearchs( 'agent_pkg_class', {
     'agentnum' => $self->cust_main($cust_pkg)->agentnum,
-    'classnum' => $cust_pkg->classnum,
+    'classnum' => $cust_pkg->part_pkg->classnum,
   });
 
   $agent_pkg_class ? $agent_pkg_class->commission_percent : 0;