X-Git-Url: http://git.indexdata.com/?p=simpleserver-moved-to-github.git;a=blobdiff_plain;f=SimpleServer.pm;h=bc8a9abdcec08a8469403c36d666dfbfc978287b;hp=307e5c7a208eb85a09f5a252c1f74b4c776542db;hb=dc9e19f7a9e21e09bd1563530aa58d3df95cd189;hpb=2838187cf5b3eb95352f68a9709929a2b42019dc

diff --git a/SimpleServer.pm b/SimpleServer.pm
index 307e5c7..bc8a9ab 100644
--- a/SimpleServer.pm
+++ b/SimpleServer.pm
@@ -25,7 +25,7 @@
 ##
 ##
 
-## $Id: SimpleServer.pm,v 1.44 2007-09-10 14:54:27 mike Exp $
+## $Id: SimpleServer.pm,v 1.46 2007-09-25 09:02:14 mike Exp $
 
 package Net::Z3950::SimpleServer;
 
@@ -39,7 +39,7 @@ require AutoLoader;
 
 @ISA = qw(Exporter AutoLoader DynaLoader);
 @EXPORT = qw( );
-$VERSION = '1.09';
+$VERSION = '1.10';
 
 bootstrap Net::Z3950::SimpleServer $VERSION;
 
@@ -320,6 +320,7 @@ The argument hash passed to the init handler has the form
   $args = {
 				    ## Response parameters:
 
+	     PEER_NAME =>  "",      ## Name or IP address of connecting client
 	     IMP_ID    =>  "",      ## Z39.50 Implementation ID
 	     IMP_NAME  =>  "",      ## Z39.50 Implementation name
 	     IMP_VER   =>  "",      ## Z39.50 Implementation version