--- zoom.sql	2007/04/26 20:57:14	6
+++ zoom.sql	2007/04/26 21:33:46	7
@@ -11,10 +11,6 @@
 insert into servers values ( 'nsk-en', '161.53.240.27', 8190, 'voyager' );
 insert into servers values ( 'loc', 'z3950.loc.gov', 7090, 'Voyager' );
 insert into servers values ( 'ucs', 'library.usc.edu', 2200, 'unicorn' );
-insert into servers values ( 'tera', 'z3950.inquirion.com', 210, 'Marc' );
-insert into servers values ( 'cosmo', 'rlw.savba.sk', 8888, 'test_un_cat' );
-insert into servers values ( 'copac', 'z3950.copac.ac.uk', 2020, 'xxdefault' );
---insert into servers values ( 'wcat', 'tikal.dev.oclc.org', 210, 'WorldCat' );
 --insert into servers values ( '', '', , '' );
 
 create type item as (
@@ -38,7 +34,7 @@
 	select host,port,database from servers where name ilike '$server'
 },1);
 
-die "can't find database $database\n" unless ( $rv->{processed} == 1 );
+die "can't find server $server in table servers\n" unless ( $rv->{processed} == 1 );
 
 my ( $host, $port, $database ) = (
 	$rv->{rows}[0]->{host},
@@ -134,6 +130,8 @@
 -- select * from search('title:djece');
 -- select * from search('osman');
 
-select * from search('NSK','title:mor');
-select * from search('NSK','grada');
-select * from search('nsk-en','restrictions');
+--select * from search('nsk','title:mor');
+--select * from search('nsk','grada');
+--select * from search('nsk-en','restrictions');
+
+select * from search('ucs','human');