use CGI;
use XML::LibXML;
use Digest::MD5 qw(md5_hex);
-use Apache2::Const -compile => qw(OK DECLINED HTTP_INTERNAL_SERVER_ERROR REDIRECT);
+use Apache2::Const -compile => qw(OK DECLINED HTTP_INTERNAL_SERVER_ERROR REDIRECT HTTP_BAD_REQUEST);
use OpenSRF::AppSession;
use OpenSRF::EX qw/:try/;
use OpenSRF::Utils::Logger qw/$logger/;
sub load_rdetail {
my $self = shift;
+ my $rec_id = $self->ctx->{page_args}->[0]
+ or return Apache2::Const::HTTP_BAD_REQUEST;
+
$self->ctx->{record} = $self->editor->retrieve_biblio_record_entry([
- $self->cgi->param('record'),
+ $rec_id,
{
flesh => 2,
flesh_fields => {
</td>
<td width='auto'>
<div>
- <a href='rdetail?record=[% rec.bre.id %]'>[% attrs.title %]</a>
+ <a href='rdetail/[% rec.bre.id %]'>[% attrs.title %]</a>
<span style='padding-left:10px;'>[% rec.copy_counts.available %] / [% rec.copy_counts.visible %]</span>
</div>
<div>[% attrs.author %]</div>