oops, very bad

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 3404a67..e6126a1 100644 (file)
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -132,7 +132,7 @@ sub new {
 
   my $hashref = $self->{'Hash'} = shift;
 
-  foreach my $field ( grep defined($hashref->{$_}), $self->fields ) { 
+  foreach my $field ( grep !defined($hashref->{$_}), $self->fields ) { 
     $hashref->{$field}='';
   }