===================================================================
RCS file: /cvs/palm/Palm-Keyring/lib/Palm/Keyring.pm,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -r1.22 -r1.23
--- palm/Palm-Keyring/lib/Palm/Keyring.pm	2007/02/01 01:56:11	1.22
+++ palm/Palm-Keyring/lib/Palm/Keyring.pm	2007/02/02 01:51:46	1.23
@@ -1,6 +1,6 @@
 package Palm::Keyring;
 
-# $RedRiver: Keyring.pm,v 1.21 2007/01/31 05:32:20 andrew Exp $
+# $RedRiver: Keyring.pm,v 1.22 2007/02/01 01:56:11 andrew Exp $
 #
 # Perl class for dealing with Keyring for Palm OS databases.
 #
@@ -87,9 +87,7 @@
     my $self = shift;
     my $rec  = shift;
 
-    my $rec0_id = $self->{'records'}->[0]->{'id'};
-
-    if ($rec->{'encrypted'} && ! $rec->{'id'} == $rec0_id) {
+    if ($rec->{'encrypted'}) {
         if (! defined $rec->{'name'}) {
             $rec->{'name'} = $EMPTY;
         }