use GoogleBooks;
use vuFind;
use DPLA;
+use AlephTR;
+use CROSBI;
use Encode;
'GOOGLEBOOKS' => 'GoogleBooks',
'HATHITRUST' => 'vuFind',
'DPLA' => 'DPLA',
+ 'MKUTUP' => 'AlephTR',
+ 'CROSBI' => 'CROSBI',
+ 'CROSBI-CASOPIS' => 'CROSBI',
+ 'CROSBI-PREPRINT' => 'CROSBI',
+ 'CROSBI-RKNJIGA' => 'CROSBI',
+ 'CROSBI-ZBORNIK' => 'CROSBI',
};
my $max_records = 10; # XXX configure this
diag "using $module for $database ", Dumper( $from );
eval { $query = $rpn->{query}->render( $from->usemap ); };
- warn "ERROR: $@" if $@;
+ warn "ERROR: ", Dumper($@) if $@;
if ( $@ && ref($@) ) { ## Did someone/something report any errors?
$self->{ERR_CODE} = $@->{errcode};
$self->{ERR_STR} = $@->{errstr};
}
}
if ( defined( $attributes->{5} ) ) { ## No truncation
- die { errcode => 113, errstr => 5 };
+# die { errcode => 113, errstr => 5 };
+ warn "# truncation is ignored";
}
my $comp = $attributes->{6};
if ($prefix) {
warn "# using custom prefix_term query";
$q = $usemap->{prefix_term}->( $prefix, $self->{term} );
} else {
- $q = $prefix . $self->{term} . '*';
+ $q = $prefix . $self->{term} . '*';
}
print "# q: $q\n";
return $q;