-# $Id: ZOOM.pm,v 1.17 2006-04-07 12:06:08 mike Exp $
+# $Id: ZOOM.pm,v 1.19 2006-04-19 20:11:45 mike Exp $
package Net::Z3950::ZOOM;
use strict;
use warnings;
-our $VERSION = '1.05';
+our $VERSION = '1.06';
require XSLoader;
XSLoader::load('Net::Z3950::ZOOM', $VERSION);
} elsif ($code == EVENT_RECV_SEARCH) {
return "receive search";
} elsif ($code == EVENT_END) {
- return "receive end";
+ return "end";
}
return "impossible event " . $code;
}