From: Ian R. <iro...@us...> - 2007-05-15 04:36:01
|
Update of /cvsroot/perl-openssl/Crypt/OpenSSL/RSA/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv17407 Modified Files: rsa.t Log Message: Patch from Andreas Vögele <an...@al...> to fix the number of tests when use_sha512_hash is not available. Index: rsa.t =================================================================== RCS file: /cvsroot/perl-openssl/Crypt/OpenSSL/RSA/t/rsa.t,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** rsa.t 13 Nov 2006 12:11:08 -0000 1.9 --- rsa.t 15 May 2007 04:35:59 -0000 1.10 *************** *** 5,9 **** use Crypt::OpenSSL::RSA; ! BEGIN { plan tests => 45 + (UNIVERSAL::can("Crypt::OpenSSL::RSA", "use_sha512_hash") ? 3*6 : 0) } sub _Test_Encrypt_And_Decrypt --- 5,9 ---- use Crypt::OpenSSL::RSA; ! BEGIN { plan tests => 43 + (UNIVERSAL::can("Crypt::OpenSSL::RSA", "use_sha512_hash") ? 4*5 : 0) } sub _Test_Encrypt_And_Decrypt |