From: ivan Date: Tue, 31 May 2005 23:42:42 +0000 (+0000) Subject: tyop refactoring old sesmon_minute price plkan, noticed by rjbs X-Git-Tag: BEFORE_FINAL_MASONIZE~499 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=192ddadcdd3776a2380e5295081f4ef17fe6bfa5 tyop refactoring old sesmon_minute price plkan, noticed by rjbs --- diff --git a/FS/FS/part_pkg/sesmon_minute.pm b/FS/FS/part_pkg/sesmon_minute.pm index fd90235d1..cd859bfe3 100644 --- a/FS/FS/part_pkg/sesmon_minute.pm +++ b/FS/FS/part_pkg/sesmon_minute.pm @@ -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');