projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
podnitfix
[freeside.git]
/
FS
/
FS
/
Record.pm
diff --git
a/FS/FS/Record.pm
b/FS/FS/Record.pm
index
f88be8b
..
646a576
100644
(file)
--- a/
FS/FS/Record.pm
+++ b/
FS/FS/Record.pm
@@
-315,6
+315,8
@@
sub AUTOLOAD {
my($field)=$AUTOLOAD;
$field =~ s/.*://;
if ( defined($value) ) {
my($field)=$AUTOLOAD;
$field =~ s/.*://;
if ( defined($value) ) {
+ confess "errant AUTOLOAD $field for $self (arg $value)"
+ unless $self->can('setfield');
$self->setfield($field,$value);
} else {
$self->getfield($field);
$self->setfield($field,$value);
} else {
$self->getfield($field);
@@
-827,6
+829,8
@@
sub fields {
$table_obj->columns;
}
$table_obj->columns;
}
+=back
+
=head1 SUBROUTINES
=over 4
=head1 SUBROUTINES
=over 4
@@
-915,7
+919,7
@@
sub DESTROY { return; }
=head1 VERSION
=head1 VERSION
-$Id: Record.pm,v 1.1
6 2001-05-07 15:42:02
ivan Exp $
+$Id: Record.pm,v 1.1
8 2001-07-30 07:33:08
ivan Exp $
=head1 BUGS
=head1 BUGS