File Mcrypt-2.5.7.0-cast256.diff of Package perl-Mcrypt

--- Mcrypt.xs
+++ Mcrypt.xs
@@ -41,6 +41,9 @@
     return -1;
 }
 
+// list of algorithms not implemented
+#undef MCRYPT_CAST_256
+
 static SV *
 constant(name, arg)
 char *name;
--- t/oop-block.t
+++ t/oop-block.t
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-use Test::More tests => 150;
+use Test::More tests => 140;
 # 9 tests for each alg/mode
 
 @algs = qw (BLOWFISH
@@ -11,7 +11,6 @@
 		XTEA
 		RC2
 		TWOFISH
-		CAST_256
 		SAFERPLUS
 		LOKI97
 		SERPENT
--- t/oop-noblock.t
+++ t/oop-noblock.t
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-use Test::More tests => 150;
+use Test::More tests => 140;
 # 9 tests for each alg/mode
 
 @algs = qw (BLOWFISH
@@ -11,7 +11,6 @@
 		XTEA
 		RC2
 		TWOFISH
-		CAST_256
 		SAFERPLUS
 		LOKI97
 		SERPENT
--- t/prp-block.t
+++ t/prp-block.t
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-use Test::More tests => 210;
+use Test::More tests => 196;
 
 @algs = qw (BLOWFISH
 		DES
@@ -10,7 +10,6 @@
 		XTEA
 		RC2
 		TWOFISH
-		CAST_256
 		SAFERPLUS
 		LOKI97
 		SERPENT
--- t/prp-noblock.t
+++ t/prp-noblock.t
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-use Test::More tests => 210;
+use Test::More tests => 196;
 
 @algs = qw (BLOWFISH
 		DES
@@ -10,7 +10,6 @@
 		XTEA
 		RC2
 		TWOFISH
-		CAST_256
 		SAFERPLUS
 		LOKI97
 		SERPENT
openSUSE Build Service is sponsored by