[freeside] freeside-daily Problem

[ivan]

On Tue, Jun 01, 2004 at 09:46:13AM -0400, Dan Clark wrote:
> Can't use an undefined value as a HASH reference at
> /usr/lib/perl5/site_perl/5.6.1/FS/Record.pm line 463.

> Freeside version 1.4.1

...
 
> I've seen this type of error before when there was a problem with a package
> setup incorrectly.  Problem is, I don't know what customer is causing the
> error, and it's not clear to me the order in which freeside-daily script
> parses users. 
> 
> Can someone clue me into how I might determine what user/package is causing
> the problem,

Apply this patch and post the full stack backtrace.


Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.86
diff -u -r1.86 Record.pm
--- Record.pm   15 Jun 2004 10:59:16 -0000      1.86
+++ Record.pm   1 Jul 2004 12:33:06 -0000
@@ -537,6 +537,8 @@
 
 sub hash {
   my($self) = @_;
+  confess $self. ' -> hash: Hash attribute is undefined'
+    unless defined($self->{'Hash'});
   %{ $self->{'Hash'} }; 
 }


-- 
_ivan