r61301 - in /branches/upstream/libcrypt-openssl-x509-perl/current: Changes X509.pm X509.xs t/x509.t

[carnil-guest at users.alioth.debian.org]

Author: carnil-guest
Date: Fri Aug  6 16:53:21 2010
New Revision: 61301

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=61301
Log:
[svn-upgrade] new version libcrypt-openssl-x509-perl (1.3)

Modified:
    branches/upstream/libcrypt-openssl-x509-perl/current/Changes
    branches/upstream/libcrypt-openssl-x509-perl/current/X509.pm
    branches/upstream/libcrypt-openssl-x509-perl/current/X509.xs
    branches/upstream/libcrypt-openssl-x509-perl/current/t/x509.t

Modified: branches/upstream/libcrypt-openssl-x509-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcrypt-openssl-x509-perl/current/Changes?rev=61301&op=diff
==============================================================================
--- branches/upstream/libcrypt-openssl-x509-perl/current/Changes (original)
+++ branches/upstream/libcrypt-openssl-x509-perl/current/Changes Fri Aug  6 16:53:21 2010
@@ -1,4 +1,7 @@
 Revision history for Perl extension Crypt::OpenSSL::X509.
+
+1.3    Fri Aug  6 09:18:30 PDT 2010
+	- Fix fingerprint_sha1.
 
 1.2    Mon May 31 05:59:03 PDT 2010
 	- Compatible with OpenSSL v1.0.0

Modified: branches/upstream/libcrypt-openssl-x509-perl/current/X509.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcrypt-openssl-x509-perl/current/X509.pm?rev=61301&op=diff
==============================================================================
--- branches/upstream/libcrypt-openssl-x509-perl/current/X509.pm (original)
+++ branches/upstream/libcrypt-openssl-x509-perl/current/X509.pm Fri Aug  6 16:53:21 2010
@@ -5,7 +5,7 @@
 use Exporter;
 use base qw(Exporter);
 
-$VERSION = '1.2';
+$VERSION = '1.3';
 
 @EXPORT_OK = qw(
   FORMAT_UNDEF FORMAT_ASN1 FORMAT_TEXT FORMAT_PEM FORMAT_NETSCAPE

Modified: branches/upstream/libcrypt-openssl-x509-perl/current/X509.xs
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcrypt-openssl-x509-perl/current/X509.xs?rev=61301&op=diff
==============================================================================
--- branches/upstream/libcrypt-openssl-x509-perl/current/X509.xs (original)
+++ branches/upstream/libcrypt-openssl-x509-perl/current/X509.xs Fri Aug  6 16:53:21 2010
@@ -583,7 +583,7 @@
   Crypt::OpenSSL::X509 x509;
 
   ALIAS:
-  fingerprint_sha1 = 2
+  fingerprint_sha1 = 1
 
   PREINIT:
 

Modified: branches/upstream/libcrypt-openssl-x509-perl/current/t/x509.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcrypt-openssl-x509-perl/current/t/x509.t?rev=61301&op=diff
==============================================================================
--- branches/upstream/libcrypt-openssl-x509-perl/current/t/x509.t (original)
+++ branches/upstream/libcrypt-openssl-x509-perl/current/t/x509.t Fri Aug  6 16:53:21 2010
@@ -1,5 +1,5 @@
 
-use Test::More tests => 43;
+use Test::More tests => 44;
 
 BEGIN { use_ok('Crypt::OpenSSL::X509') };
 
@@ -8,6 +8,7 @@
 ok($x509->serial() eq '325033CF50D156F35C81AD655C4FC825', 'serial()');
 
 ok($x509->fingerprint_md5() eq '51:86:E8:1F:BC:B1:C3:71:B5:18:10:DB:5F:DC:F6:20', 'fingerprint_md5()');
+ok($x509->fingerprint_sha1() eq '78:E9:DD:06:50:62:4D:B9:CB:36:B5:07:67:F2:09:B8:43:BE:15:B3', 'fingerprint_sha1()');
 
 ok($x509->exponent() eq '10001', 'exponent()');
 ok($x509->pub_exponent() eq '10001', 'pub_exponent()'); # Alias