[Koha-cvs] CVS: koha/z3950/server zed-koha-server.pl,1.1,1.2

[Joshua Ferraro]

Update of /cvsroot/koha/koha/z3950/server
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11356

Modified Files:
        zed-koha-server.pl 
Log Message:
Fixed some documentation; no functional changes 


Index: zed-koha-server.pl
===================================================================
RCS file: /cvsroot/koha/koha/z3950/server/zed-koha-server.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** zed-koha-server.pl  9 Jan 2004 19:50:42 -0000       1.1
--- zed-koha-server.pl  15 Apr 2004 03:47:06 -0000      1.2
***************
*** 19,40 ****
  #
  #-----------------------------------
! # Script Name: npl-search.pl
! # Script Version: 0.01
! # Date:  2003/10/02
! # Author:  Joshua Ferraro (address@hidden)
  # Description: A very basic Z3950 Server 
  # Usage: zed-koha-server.pl
  # Revision History:
! #    0.00  2003/08/14:        original version; search works
! #    0.01  2003/10/02:        first functional version; search and fetch 
working
! #                             records returned in USMARC (ISO2709) format     
! #                     Bath compliant to Level 1 in Functional Areas A, B 
  #-----------------------------------
  # Note: After installing SimpleServer (indexdata.dk/simpleserver) and 
  # changing the leader information in Koha's MARCgetbiblio subroutine in
  # Biblio.pm you can run this script as root:
  # ./zed-koha-server.pl
  # and the server will start running on port 9999 and will allow searching
! # and retrieval of records in MARC21
  # ----------------------------------
  use DBI;
--- 19,44 ----
  #
  #-----------------------------------
! # Script Name: zed-koha-server.pl
! # Script Version: 0.02
! # Date:  2004/04/14
! # Author:  Joshua Ferraro [jmf at kados dot org]
  # Description: A very basic Z3950 Server 
  # Usage: zed-koha-server.pl
  # Revision History:
! #    0.00  2003/08/14:        Original version; search works.
! #    0.01  2003/10/02:        First functional version; search and fetch 
working
! #                              records returned in USMARC (ISO2709) format,   
  
! #                      Bath compliant to Level 1 in Functional Areas A, B.
! #    0.02  2004/04/14:  Cleaned up documentation, etc. No functional 
! #                      changes.
  #-----------------------------------
  # Note: After installing SimpleServer (indexdata.dk/simpleserver) and 
  # changing the leader information in Koha's MARCgetbiblio subroutine in
  # Biblio.pm you can run this script as root:
+ # 
  # ./zed-koha-server.pl
+ #
  # and the server will start running on port 9999 and will allow searching
! # and retrieval of records in MARC21 (USMARC; ISO2709) bibliographic format.
  # ----------------------------------
  use DBI;
***************
*** 53,64 ****
                                            FETCH => \&fetch_handler);
  
! $handler->launch_server("npl-search.pl", @ARGV);
  
  sub init_handler {
          my $args = shift;
          my $session = {};
! 
!         $args->{IMP_NAME} = "NPLKoha";
!         $args->{IMP_VER} = "0.01";
          $args->{ERR_CODE} = 0;
          $args->{HANDLE} = $session;
--- 57,69 ----
                                            FETCH => \&fetch_handler);
  
! $handler->launch_server("zed-koha-server.pl", @ARGV);
  
  sub init_handler {
          my $args = shift;
          my $session = {};
!       
!       # FIXME: I should force use of my database name 
!         $args->{IMP_NAME} = "Zed-Koha";
!         $args->{IMP_VER} = "0.02";
          $args->{ERR_CODE} = 0;
          $args->{HANDLE} = $session;
***************
*** 98,103 ****
        $term =~ s| |\%|g;
          $term .= "\%";         ## Add the wildcard to search term
-         $term .= "\%";         ## Add the wildcard to search term
-         $term = "\%" . "$term";
  
        $_ = "$query";
--- 103,106 ----