From: ivan <ivan>
Date: Fri, 11 Jul 2003 07:30:57 +0000 (+0000)
Subject: provide stack backtrace when we wind up in FS::Record::AUTOLOAD by accident
X-Git-Tag: freeside_1_5_0pre3~8
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=3b0d96e466a6dbe2a27e45890b08e0fd79e8fdab

provide stack backtrace when we wind up in FS::Record::AUTOLOAD by accident
---

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 9a724feac..c756e9825 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -426,11 +426,11 @@ sub AUTOLOAD {
   $field =~ s/.*://;
   if ( defined($value) ) {
     confess "errant AUTOLOAD $field for $self (arg $value)"
-      unless $self->can('setfield');
+      unless $ref($self) && $self->can('setfield');
     $self->setfield($field,$value);
   } else {
     confess "errant AUTOLOAD $field for $self (no args)"
-      unless $self->can('getfield');
+      unless ref($self) && $self->can('getfield');
     $self->getfield($field);
   }    
 }