palm/Palm-Keyring/lib/Palm/Keyring.pm - diff

Return to Keyring.pm CVS log

Up to [local] / palm / Palm-Keyring / lib / Palm

version 1.51, 2007/09/13 16:46:09

version 1.52, 2007/12/04 03:33:34

Line 1

package Palm::Keyring;

# $RedRiver: Keyring.pm,v 1.50 2007/09/13 00:02:52 andrew Exp $

# $RedRiver: Keyring.pm,v 1.51 2007/09/13 15:46:09 andrew Exp $

########################################################################

# Keyring.pm *** Perl class for Keyring for Palm OS databases.

Line 83

);

our $VERSION = '0.96_05';

our $VERSION = '0.96_06';

sub new

{

Line 631

my $plaintext;

foreach my $k (keys %{ $new }) {

next if $new->{$k}->{label_id} == 0;

$plaintext .= _pack_field($new->{$k});

}

#$plaintext .= chr(0xff) x 2;

my $encrypted;

if ($c->{name} eq 'None') {