add maximum "caps" to RADIUS usage charges

[freeside.git] / FS / FS / part_pkg / sesmon_minute.pm

diff --git a/FS/FS/part_pkg/sesmon_minute.pm b/FS/FS/part_pkg/sesmon_minute.pm
index fd90235..6af7c08 100644 (file)
--- a/FS/FS/part_pkg/sesmon_minute.pm
+++ b/FS/FS/part_pkg/sesmon_minute.pm
@@ -3,7 +3,7 @@ package FS::part_pkg::sesmon_minute;
 use strict;
 use vars qw(@ISA %info);
 #use FS::Record qw(qsearch qsearchs);
-use FS::part_pkg;
+use FS::part_pkg::flat;
 
 @ISA = qw(FS::part_pkg::flat);
 
@@ -34,7 +34,7 @@ use FS::part_pkg;
 );
 
 
-sub cakc_recur {
+sub calc_recur {
   my( $self, $cust_pkg ) = @);
   my $min = $cust_pkg->seconds_since($cust_pkg->bill || 0) / 60;
   $min -= $self->option('recur_included_min');