===================================================================
RCS file: /cvs/palm/Palm-Keyring/lib/Palm/Keyring.pm,v
retrieving revision 1.52
retrieving revision 1.54
diff -u -r1.52 -r1.54
--- palm/Palm-Keyring/lib/Palm/Keyring.pm	2007/12/04 03:33:34	1.52
+++ palm/Palm-Keyring/lib/Palm/Keyring.pm	2007/12/05 05:42:29	1.54
@@ -1,5 +1,5 @@
 package Palm::Keyring;
-# $RedRiver: Keyring.pm,v 1.51 2007/09/13 15:46:09 andrew Exp $
+# $RedRiver: Keyring.pm,v 1.53 2007/12/04 03:34:17 andrew Exp $
 ########################################################################
 # Keyring.pm *** Perl class for Keyring for Palm OS databases.
 #
@@ -15,6 +15,8 @@
 use strict;
 use warnings;
 
+require 5.006_001;
+
 use Carp;
 
 use base qw/ Palm::StdAppInfo /;
@@ -83,7 +85,7 @@
 );
 
 
-our $VERSION = '0.96_06';
+our $VERSION = '0.96_07';
 
 sub new 
 {
@@ -634,7 +636,7 @@
         next if $new->{$k}->{label_id} == 0;
         $plaintext .= _pack_field($new->{$k});
     }
-	#$plaintext .= chr(0xff) x 2;
+    $plaintext .= chr(0xff) x 2;
 
     my $encrypted;
     if ($c->{name} eq 'None') {