summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2003-07-11 07:30:57 +0000
committerivan <ivan>2003-07-11 07:30:57 +0000
commit3b0d96e466a6dbe2a27e45890b08e0fd79e8fdab (patch)
tree6496d0c13ff4a9b527a8ce2606e41f7c44eeb404
parenta1f82a6afd45e0fd208b1e69c6647195eab48bb6 (diff)
provide stack backtrace when we wind up in FS::Record::AUTOLOAD by accident
-rw-r--r--FS/FS/Record.pm4
1 files changed, 2 insertions, 2 deletions
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);
}
}