X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=perl%2Fzebra_perl.c;fp=perl%2Fzebra_perl.c;h=0649bcaf930114eaf1f8e70a8bc0d09180223cf5;hb=4003296c8a5cf45925cf18f2d6feef929ead1f66;hp=76315932c05ef37cf6f4b8fc77787304960be4f0;hpb=1b62315f3ba83b91a8580f72943124ba9cb09249;p=idzebra-moved-to-github.git

diff --git a/perl/zebra_perl.c b/perl/zebra_perl.c
index 7631593..0649bca 100644
--- a/perl/zebra_perl.c
+++ b/perl/zebra_perl.c
@@ -20,7 +20,7 @@ void init (void) {
 void DESTROY (void) {
   nmem_exit ();
   yaz_log (LOG_LOG, "Zebra API destroyed");
-}
+}   
 
 /* Logging facilities from yaz */
 void logLevel (int level) {
@@ -35,5 +35,6 @@ void logMsg (int level, const char *message) {
   logf(level, "%s", message);
 }
 
-
-
+void zts_test (ZebraTransactionStatus *stat) {
+  stat->processed++;
+}