From 9c887fc97d778b4817ab59bea111f5377196d8b4 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Tue, 11 May 2004 12:56:37 +0000
Subject: [PATCH] Do not include unistd.h on Windows. Remove redundant
 PERL_SET_CONTEXT.

---
 SimpleServer.xs |    7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/SimpleServer.xs b/SimpleServer.xs
index 879ea74..0f4d5ab 100644
--- a/SimpleServer.xs
+++ b/SimpleServer.xs
@@ -1,6 +1,6 @@
 /*
 
- * $Id: SimpleServer.xs,v 1.21 2004-05-11 12:15:16 sondberg Exp $ 
+ * $Id: SimpleServer.xs,v 1.22 2004-05-11 12:56:37 adam Exp $ 
  * ----------------------------------------------------------------------
  * 
  * Copyright (c) 2000, Index Data.
@@ -38,7 +38,10 @@
 #include <yaz/log.h>
 #include <yaz/wrbuf.h>
 #include <stdio.h>
+#ifdef WIN32
+#else
 #include <unistd.h>
+#endif
 #include <stdlib.h>
 #include <ctype.h>
 #define GRS_MAX_FIELDS 500 
@@ -1137,8 +1140,6 @@ bend_initresult *bend_init(bend_initrequest *q)
 	char *passwd = NULL;
 	CV* handler_cv = 0;
 
-	PERL_SET_CONTEXT(PERL_GET_THX);
-
 	dSP;
 	ENTER;
 	SAVETMPS;
-- 
1.7.10.4