File Crypt-Blowfish-2.10.diff of Package perl-Crypt-Blowfish

--- Blowfish.xs
+++ Blowfish.xs
@@ -59,7 +59,7 @@
 
 		ks = (char *) SvPV(ST(2), ks_len);
 
-		if (output == &sv_undef)
+		if (output == &PL_sv_undef)
 			output = sv_newmortal();
 		output_len = 8;
 
--- _blowfish.c
+++ _blowfish.c
@@ -18,6 +18,7 @@
    Code by Bryan Olson, based partly on Schneier's.
 */
 
+#include <string.h>
 
 /* Define IntU32 to be an unsigned in 32 bits long */
 typedef unsigned int IntU32 ;
openSUSE Build Service is sponsored by