From 3cb93a3aa0af9f004b7ee122bdf5c1daf5f1289c Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 13 Jul 2009 10:12:22 +0000 Subject: [PATCH] eliminate harmless "no %info hash found in FS::part_pkg::recur_Common, skipping" warning --- FS/FS/part_pkg/recur_Common.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/FS/FS/part_pkg/recur_Common.pm b/FS/FS/part_pkg/recur_Common.pm index 71f3af718..2739cbc8f 100644 --- a/FS/FS/part_pkg/recur_Common.pm +++ b/FS/FS/part_pkg/recur_Common.pm @@ -1,13 +1,15 @@ package FS::part_pkg::recur_Common; use strict; -use vars qw( @ISA %recur_method ); +use vars qw( @ISA %info %recur_method ); use Tie::IxHash; use Time::Local; use FS::part_pkg::prorate; @ISA = qw(FS::part_pkg::prorate); +%info = ( 'disabled' => 1 ); #recur_Common not a usable price plan directly + tie %recur_method, 'Tie::IxHash', 'anniversary' => 'Charge the recurring fee at the frequency specified above', 'prorate' => 'Charge a prorated fee the first time (selectable billing date)', -- 2.11.0