From a486765cc7b6e1cb110720ba199788cf0f7c1280 Mon Sep 17 00:00:00 2001 From: ivan Date: Sun, 30 Jun 2002 07:17:48 +0000 Subject: [PATCH 1/1] oops, very bad --- FS/FS/Record.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index 3404a67fe..e6126a13b 100644 --- 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}=''; } -- 2.11.0