X-Git-Url: http://lists.indexdata.dk/cgi-bin?a=blobdiff_plain;f=util%2Fgips.c;h=ebc5abb7b2a3747666fae9e88c9ed7a0605d1ea4;hb=00b4ed0ab0dace63e5824bc16d1e0cc414289bcc;hp=b5da5ef3b12888449a0616bd3fb0b7d858667925;hpb=d51076215bd716f784f60cde424b218f321e3852;p=egate.git

diff --git a/util/gips.c b/util/gips.c
index b5da5ef..ebc5abb 100644
--- a/util/gips.c
+++ b/util/gips.c
@@ -2,7 +2,10 @@
  * Europagate, 1995
  *
  * $Log: gips.c,v $
- * Revision 1.2  1995/04/19 16:02:06  adam
+ * Revision 1.3  1995/04/20 15:12:46  adam
+ * Minor hacks really.
+ *
+ * Revision 1.2  1995/04/19  16:02:06  adam
  * Some hacks to get the FIFO communication work!! Isn't reliable.
  *
  * Revision 1.1  1995/03/27  08:25:00  adam
@@ -46,7 +49,15 @@ int gips_open (GIP gip, const char *client)
 
 int gips_close (GIP gip)
 {
-    close (gip->rfd);
-    close (gip->wfd);
+    if (gip->rfd != -1)
+    {
+        close (gip->rfd);
+	gip->rfd = -1;
+    }
+    if (gip->wfd != -1)
+    {
+        close (gip->wfd);
+	gip->wfd = -1;
+    }
     return 0;
 }