freeside/FS/FS Record.pm,1.86,1.87
ivan
ivan at pouncequick.420.am
Thu Jul 1 05:42:07 PDT 2004
Update of /home/cvs/cvsroot/freeside/FS/FS
In directory pouncequick:/tmp/cvs-serv24839
Modified Files:
Record.pm
Log Message:
show a full stack backtrace if we wind up in the hash method with an empty Hash attribute, wtf?
Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.86
retrieving revision 1.87
diff -u -d -r1.86 -r1.87
--- Record.pm 15 Jun 2004 10:59:16 -0000 1.86
+++ Record.pm 1 Jul 2004 12:42:03 -0000 1.87
@@ -537,6 +537,8 @@
sub hash {
my($self) = @_;
+ confess $self. ' -> hash: Hash attribute is undefined'
+ unless defined($self->{'Hash'});
%{ $self->{'Hash'} };
}
More information about the freeside-commits
mailing list