From: Anders S. Mortensen <sondberg@indexdata.dk>
Date: Tue, 11 Sep 2001 13:07:07 +0000 (+0000)
Subject: Minor changes.
X-Git-Tag: release.0.0.8.lau~51
X-Git-Url: http://sru.miketaylor.org.uk/cgi-bin?a=commitdiff_plain;h=d0c7c7bc5cd6ad4f13e62dc1f5c1b6dfb19e04ae;p=simpleserver-moved-to-github.git

Minor changes.
---

diff --git a/grs_test.pl b/grs_test.pl
index e6bfbf3..a6fe476 100755
--- a/grs_test.pl
+++ b/grs_test.pl
@@ -97,16 +97,19 @@ sub my_fetch_handler {
 }
 
 
-my $handler = Net::Z3950::SimpleServer->new({ 
+my $handler = new Net::Z3950::SimpleServer( 
 		INIT	=>	\&my_init_handler,
 		SEARCH	=>	\&my_search_handler,
-		FETCH	=>	\&my_fetch_handler });
+		FETCH	=>	\&my_fetch_handler );
 
 $handler->launch_server("ztest.pl", @ARGV);
 
 
 ## $Log: grs_test.pl,v $
-## Revision 1.1  2001-03-13 14:19:28  sondberg
+## Revision 1.2  2001-09-11 13:07:07  sondberg
+## Minor changes.
+##
+## Revision 1.1  2001/03/13 14:19:28  sondberg
 ## Added a modified version of ztest.pl called grs_test.pl, which shows how to
 ## implement support of GRS-1 record syntax.
 ##