X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=zlayer%2Fzaccess.c;fp=zlayer%2Fzaccess.c;h=0420161026213c3f5b3ff3558147aac71e426d71;hb=f6164c93ea8b575c43586bd08b34122b37f5f7af;hp=3cbc5ca590a99a886680f17cc762d8a47b56bb04;hpb=5fd73265b5f566ea75ba047730bd2e238d7f7513;p=egate.git

diff --git a/zlayer/zaccess.c b/zlayer/zaccess.c
index 3cbc5ca..0420161 100644
--- a/zlayer/zaccess.c
+++ b/zlayer/zaccess.c
@@ -4,7 +4,10 @@
  * Z39.50 API for the Email gateway
  *
  * $Log: zaccess.c,v $
- * Revision 1.14  1995/02/23 08:32:26  adam
+ * Revision 1.15  1995/04/17 11:26:55  quinn
+ * Added YAZ version of zaccess
+ *
+ * Revision 1.14  1995/02/23  08:32:26  adam
  * Changed header.
  *
  * Revision 1.12  1995/02/20  20:35:37  quinn
@@ -124,6 +127,7 @@ ZASS zass_open(char *host, int port)
     PINITREQUEST ireq;
     PINITRESPONSE ires;
     int len;
+    char name[512];
 
     if (!(p = malloc(sizeof(*p))))
     {
@@ -154,8 +158,9 @@ ZASS zass_open(char *host, int port)
     }
     gw_log(ZASS_DEBUG, ZASS_TYPE, "Opened connection to %s:%d", p->ass->HostName,
     	p->ass->Port);
+    sprintf(name, "%s (ZDIST protocol layer)", ZASS_NAME);
     ireq = InitRequest_CreateInitAllASCII(0, "yy", "yy", p->maxrecordsize,
-    	p->preferredmessagesize, ZASS_ID, ZASS_NAME, ZASS_VERSION, 0);
+    	p->preferredmessagesize, ZASS_ID, name, ZASS_VERSION, 0);
     if (!ireq)
     {
     	gw_log(GW_LOG_FATAL, "ZASS_TYPE", "failed to create initrequest");
@@ -465,7 +470,7 @@ const struct zass_presentent *zass_present(ZASS a, char *resname, int start,
 	}
 	PresentResponse_Destroy(pdu);
     }
-    while (num - r.num);
+    while (num - r.num && start);
     *rec = 0;
 	
     return &r;