Small updates to the documentation
[simpleserver-moved-to-github.git] / ztest.pl
index 486ff11..573839a 100755 (executable)
--- a/ztest.pl
+++ b/ztest.pl
@@ -58,7 +58,7 @@ sub my_fetch_handler {
        my $record = "<xml>";
        my $field;
        my $hits = $session->{__HITS};
-       my $href = $data->[$offset];
+       my $href = $data->[$offset - 1];
 
        $args->{REP_FORM} = Net::Z3950::OID::xml;