Debugging.

diff --git a/zlayer/zaccess.c b/zlayer/zaccess.c
index b078ccb..346d4ed 100644 (file)
--- a/zlayer/zaccess.c
+++ b/zlayer/zaccess.c
@@ -2,7 +2,10 @@
  * Europagate, 1995
  *
  * $Log: zaccess.c,v $
- * Revision 1.5  1995/02/17 13:58:01  quinn
+ * Revision 1.6  1995/02/17 14:41:22  quinn
+ * Debugging.
+ *
+ * Revision 1.5  1995/02/17  13:58:01  quinn
  * First kick at present handling
  *
  * Revision 1.4  1995/02/16  15:33:45  quinn
@@ -377,7 +380,8 @@ const struct zass_presentent *zass_present(ZASS a, char *resname, int start,
     {
        gw_log(ZASS_DEBUG, ZASS_TYPE, "Fetching %d records from # %d", num,
            start);
-       pdu = PresentRequest_CreateInitAllASCII(0, resname, start, num, 0, 0);
+       pdu = PresentRequest_CreateInitAllASCII(0, resname, start, num, "F",
+           USMARC_OID);
        if (!pdu)
        {
            gw_log(GW_LOG_FATAL, "ZASS_TYPE", "failed to create presentrequest");
@@ -423,8 +427,10 @@ const struct zass_presentent *zass_present(ZASS a, char *resname, int start,
        {
            case RESPONSERECORDS_TAG:
                get_responserecords(&rec, PresentResponse_GetResponseRecords(pdu));
+               break;
            case NONSURROGATEDIAGNOSTIC_TAG:
                get_diagrec(&rec, PresentResponse_GetNonSurrogateDiagnostic(pdu));
+               break;
            default:
                gw_log(GW_LOG_WARN, ZASS_TYPE, "Bad tag in response rec.");
        }