diff --git a/lib/Crypt/PWSafe3/Record.pm b/lib/Crypt/PWSafe3/Record.pm
index 1492707..b4f7a0d 100644
--- a/lib/Crypt/PWSafe3/Record.pm
+++ b/lib/Crypt/PWSafe3/Record.pm
@@ -137,7 +137,11 @@ sub addfield {
   #
   # add a field to the record
   my ($this, $field) = @_;
-  $this->{field}->{ $map2name{$field->type} } = $field;
+  my $name = $map2name{$field->type};
+  unless( defined($name) ) {
+      $name = $field->type; # consistent with Field->new
+  }
+  $this->{field}->{ $name } = $field;
 }
 
 =head1 NAME