===================================================================
RCS file: /cvs/palm/Palm-Keyring/lib/Palm/Keyring.pm,v
retrieving revision 1.37
retrieving revision 1.38
diff -u -r1.37 -r1.38
--- palm/Palm-Keyring/lib/Palm/Keyring.pm	2007/02/23 02:34:01	1.37
+++ palm/Palm-Keyring/lib/Palm/Keyring.pm	2007/02/23 02:54:49	1.38
@@ -1,5 +1,5 @@
 package Palm::Keyring;
-# $RedRiver: Keyring.pm,v 1.36 2007/02/22 05:16:04 andrew Exp $
+# $RedRiver: Keyring.pm,v 1.37 2007/02/23 02:34:01 andrew Exp $
 ########################################################################
 # Keyring.pm *** Perl class for Keyring for Palm OS databases.
 #
@@ -1128,7 +1128,7 @@
             $packed .= $NULL;
         }
     } else {
-        my $packstr = "n1 c1 c1 x1";
+        my $packstr = "n1 C1 C1 x1";
         $packed = pack $packstr, 0, 0, 0;
     }
 
@@ -1309,7 +1309,7 @@
             print ' - ', $acct->{account};
         } else {
             foreach my $a (@{ $acct }) {
-                if ($a->{type} eq 'account') {
+                if ($a->{label} eq 'account') {
                     print ' - ',  $a->{data};
                     last;
                 }
@@ -1338,8 +1338,10 @@
     $pdb = new Palm::Keyring({ key1 => value1,  key2 => value2 });
     $pdb = new Palm::Keyring( -key1 => value1, -key2 => value2);
 
-Supported options
+=over
 
+=item Supported options
+
 =over
 
 =item password
@@ -1374,6 +1376,8 @@
 
 =back
 
+=back
+
 For v5 databases there are some additional appinfo fields set.
 
     $pdb->{appinfo} = {
@@ -1386,7 +1390,10 @@
 
 Pass in the alias of the crypt to use, or the index.
 
+These only make sense for v5 databases.
+
 This is a function, not a method.  
+$cipher can be 0, 1, 2, 3, None, DES_EDE3, AES128 or AES256.
 
     my $c = Palm::Keyring::crypt($cipher);