<host>z3950.loc.gov</host>
<port>7090</port>
<db>Voyager</db>
- <!-- fetch the full record with no holdings. FI is the default -->
+ <!-- fetch the full record with no holdings. FI is the most common choice -->
<record_format>FI</record_format>
<!-- Record transmission format from the server. Supported -->
my $offset = shift || 0;
my $service = shift;
+ my $rformat = $services{$service}->{record_format};
my $tformat = $services{$service}->{transmission_format} || $output;
- my $rformat = $services{$service}->{record_format} || 'FI';
- $results->option(elementSetName => $rformat);
- $logger->info("z3950: using record format '$rformat'");
+
+ $results->option(elementSetName => $rformat);
+ $results->option(preferredRecordSyntax => $tformat);
+ $logger->info("z3950: using record format '$rformat' and transmission format '$tformat'");
my @records;
my $res = {};