[freeside-commits] freeside/FS/FS part_pkg.pm,1.49,1.50

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv28308

Modified Files:
	part_pkg.pm 
Log Message:
better debugging for missing recur_fee so its easier to check the db

Index: part_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_pkg.pm,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -d -r1.49 -r1.50
--- part_pkg.pm	19 Jun 2006 02:33:52 -0000	1.49
+++ part_pkg.pm	10 Aug 2006 02:27:35 -0000	1.50
@@ -687,7 +687,8 @@
   my %plandata = map { /^(\w+)=(.*)$/; ( $1 => $2 ); }
                      split("\n", $self->get('plandata') );
   return $plandata{$opt} if exists $plandata{$opt};
-  cluck "Package definition option $opt not found in options or plandata!\n"
+  cluck "WARNING: (pkgpart ". $self->pkgpart. ") Package def option $opt".
+        "not found in options or plandata!\n"
     unless $ornull;
   '';
 }