[BACK]Return to Keyring.pm CVS log [TXT][DIR] Up to [local] / palm / Palm-Keyring / lib / Palm

Diff for /palm/Palm-Keyring/lib/Palm/Keyring.pm between version 1.37 and 1.38

version 1.37, 2007/02/23 02:34:01 version 1.38, 2007/02/23 02:54:49
Line 1 
Line 1 
 package Palm::Keyring;  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.  # Keyring.pm *** Perl class for Keyring for Palm OS databases.
 #  #
Line 1128 
Line 1128 
             $packed .= $NULL;              $packed .= $NULL;
         }          }
     } else {      } else {
         my $packstr = "n1 c1 c1 x1";          my $packstr = "n1 C1 C1 x1";
         $packed = pack $packstr, 0, 0, 0;          $packed = pack $packstr, 0, 0, 0;
     }      }
   
Line 1309 
Line 1309 
             print ' - ', $acct->{account};              print ' - ', $acct->{account};
         } else {          } else {
             foreach my $a (@{ $acct }) {              foreach my $a (@{ $acct }) {
                 if ($a->{type} eq 'account') {                  if ($a->{label} eq 'account') {
                     print ' - ',  $a->{data};                      print ' - ',  $a->{data};
                     last;                      last;
                 }                  }
Line 1338 
Line 1338 
     $pdb = new Palm::Keyring({ key1 => value1,  key2 => value2 });      $pdb = new Palm::Keyring({ key1 => value1,  key2 => value2 });
     $pdb = new Palm::Keyring( -key1 => value1, -key2 => value2);      $pdb = new Palm::Keyring( -key1 => value1, -key2 => value2);
   
 Supported options  =over
   
   =item Supported options
   
 =over  =over
   
 =item password  =item password
Line 1374 
Line 1376 
   
 =back  =back
   
   =back
   
 For v5 databases there are some additional appinfo fields set.  For v5 databases there are some additional appinfo fields set.
   
     $pdb->{appinfo} = {      $pdb->{appinfo} = {
Line 1386 
Line 1390 
   
 Pass in the alias of the crypt to use, or the index.  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.  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);      my $c = Palm::Keyring::crypt($cipher);
   
Legend:
Removed from v.1.37  
changed lines
  Added in v.1.38
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>