X-Git-Url: http://git.indexdata.com/?p=simpleserver-moved-to-github.git;a=blobdiff_plain;f=SimpleServer.xs;h=4c9f8a44b8d5719398f51baa4bffb12f660fe142;hp=e2db79f52d07ca5cdb51fc106fa130dcafe34f0f;hb=dce047d22f3830ef79f4f94695c84c5fca8594c9;hpb=2edffd526d9e0ced8031fb5e3fcb658b93a69b39

diff --git a/SimpleServer.xs b/SimpleServer.xs
index e2db79f..4c9f8a4 100644
--- a/SimpleServer.xs
+++ b/SimpleServer.xs
@@ -37,7 +37,9 @@
 #ifdef ASN_COMPILED
 #include <yaz/ill.h>
 #endif
-
+#ifndef sv_undef		/* To fix the problem with Perl 5.6.0 */
+#define sv_undef PL_sv_undef
+#endif
 
 typedef struct {
 	SV *handle;