diff options
author | ivan <ivan> | 2003-07-11 07:30:59 +0000 |
---|---|---|
committer | ivan <ivan> | 2003-07-11 07:30:59 +0000 |
commit | 94e9b5bcb15dbba53b3705a793be4e9185325cec (patch) | |
tree | 71263bbd85b34ebeb0e93de436cea9242c9a00e7 | |
parent | 7e6ff93bbfc9544a7eead42dea3c01d37de2fc6b (diff) |
provide stack backtrace when we wind up in FS::Record::AUTOLOAD by accident
-rw-r--r-- | FS/FS/Record.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index 5cf77d3e7..45d4dbee0 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -428,11 +428,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); } } |