X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FRecord.pm;h=9f3549468e5931a2ea08ab1faced94bc22e6122f;hp=3c8e9bac60541fc1427b3b0e04ad357ef0944118;hb=dcdc515874c5db8e450550f41da21e9490709d5b;hpb=e4c4a600a9f167f84c1a0663f73797ed18934e92

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 3c8e9bac6..9f3549468 100644
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -384,7 +384,7 @@ $record->column('value') is a synonym for $record->set('column','value');
 sub AUTOLOAD {
   my $field = $AUTOLOAD;
   $field =~ s/.*://;
-  if ( scalar(@_) == 2 ) {
+  if ( defined($_[1]) ) {
     $_[0]->setfield($field, $_[1]);
   } else {
     $_[0]->getfield($field);
@@ -1036,12 +1036,12 @@ sub hfields {
   \%hash;
 }
 
-#sub _dump {
-#  my($self)=@_;
-#  join("\n", map {
-#    "$_: ". $self->getfield($_). "|"
-#  } (fields($self->table)) );
-#}
+sub _dump {
+  my($self)=@_;
+  join("\n", map {
+    "$_: ". $self->getfield($_). "|"
+  } (fields($self->table)) );
+}
 
 sub DESTROY { return; }