ZebraRetrievalRecord changed. Fixed returning of null buffers in the wrapper

[idzebra-moved-to-github.git] / perl / zebra_perl.h

diff --git a/perl/zebra_perl.h b/perl/zebra_perl.h
index 5abd5cc..7020563 100644 (file)
--- a/perl/zebra_perl.h
+++ b/perl/zebra_perl.h
@@ -29,6 +29,8 @@ typedef struct {
   char *errString;     /* error string */
   int  position;       /* position of record in result set (1,2,..) */
   char *base; 
+  int  sysno;
+  int  score;
   oid_value format;    /* record syntax */
   RetrievalRecordBuf *buf;
 } RetrievalRecord;
@@ -47,3 +49,5 @@ typedef struct {
 } ScanObj;
 
 #endif
+
+