X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=server.pl;h=f1ea91bbcf41413d0790a0e1d471003d279d5f50;hb=0b72c4a40c91e195ce264d4099a8de6011103ff0;hp=693ce186d4eb0c8d3ec6d6d44ceeed0beabe51c1;hpb=7ae517508971c0ba1b2cb0a9051fe166dc31b7f2;p=Biblio-Z3950.git

diff --git a/server.pl b/server.pl
index 693ce18..f1ea91b 100755
--- a/server.pl
+++ b/server.pl
@@ -127,7 +127,7 @@ sub FetchHandle {
 		$req_form eq Net::Z3950::OID::xml()     ? 'xml' :
 		$req_form eq Net::Z3950::OID::unimarc() ? 'unimarc' :
 		$req_form eq Net::Z3950::OID::usmarc()  ? 'marc' : # XXX usmarc -> marc
-		undef;
+		die "unknown format $req_form";
 
 	if ( ! $format ) {
 		warn "ERROR: $req_form format not supported";