rename to Biblio Z39.50

diff --git a/Build.PL b/Build.PL
index 2641ae9..56085e6 100644 (file)
--- a/Build.PL
+++ b/Build.PL
@@ -4,7 +4,7 @@ use warnings;
 use strict;
 
 my $build = Module::Build->new(
-       module_name => 'Z3950::HTML::Scraper',
+       module_name => 'Biblio::Z39.50',
        dist_version => '0.00',
        license     => 'perl',
        requires    => {

diff --git a/server.pl b/server.pl
index 7cc545f..8f4f6c5 100755 (executable)
--- a/server.pl
+++ b/server.pl
@@ -19,8 +19,8 @@ sub InitHandle {
     my $session = {};
 
     $this->{HANDLE}   = $session;
-    $this->{IMP_NAME} = "Z39.50 HTML scraping bot";
-    $this->{IMP_VER}  = "0.1";
+    $this->{IMP_NAME} = "Biblio Z39.50";
+    $this->{IMP_VER}  = "0.2";
     $session->{SETS}  = {};
 }