}
}
- for my $basic_axis ( qw/authority.title authority.author authority.subject authority.topic/ ) {
+ my $auth_axes = $supercat
+ ->request("open-ils.supercat.authority.browse_axis_list")
+ ->gather(1);
+
+
+ for my $axis ( @$auth_axes ) {
+ my $basic_axis = 'authority.' . $axis;
for my $browse_axis ( ($basic_axis, $basic_axis . ".refs") ) {
{
my $__f = 'marcxml';
$type = 'authority' if ($scheme =~ /^authority/o);
$command = 'retrieve';
$command = 'browse' if (grep { $scheme eq $_ } qw/call_number title author subject topic authority.title authority.author authority.subject authority.topic series item-age/);
+ $command = 'browse' if ($scheme =~ /^authority/);
}
if ($paging) {
$string =~ s/\+/ /go;
$string =~ s/'//go;
- my $tree = $supercat->request(
- "open-ils.supercat.$axis.browse",
- $string,
- (($axis =~ /^authority/) ? () : ($site)),
- $page_size,
- $page,
- $status,
- $cpLoc
- )->gather(1);
+ my $tree;
+ if ($axis =~ /^authority/) {
+ $tree = $supercat->request(
+ "open-ils.supercat.authority.browse.by_axis",
+ $axis,
+ $string,
+ $page_size,
+ $page
+ )->gather(1);
+ } else {
+ $tree = $supercat->request(
+ "open-ils.supercat.$axis.browse",
+ $string,
+ $site,
+ $page_size,
+ $page,
+ $status,
+ $cpLoc
+ )->gather(1);
+ }
(my $norm_format = $format) =~ s/(-full|-uris)$//o;
$string =~ s/\+/ /go;
$string =~ s/'//go;
- my $tree = $supercat->request(
- "open-ils.supercat.$axis.startwith",
- $string,
- (($axis =~ /^authority/) ? () : ($site)),
- $page_size,
- $page,
- $status,
- $cpLoc
- )->gather(1);
+ my $tree;
+ if ($axis =~ /^authority/) {
+ $tree = $supercat->request(
+ "open-ils.supercat.authority.startwith.by_axis",
+ $axis,
+ $string,
+ $page_size,
+ $page
+ )->gather(1);
+ } else {
+ $tree = $supercat->request(
+ "open-ils.supercat.$axis.startwith",
+ $string,
+ $site,
+ $page_size,
+ $page,
+ $status,
+ $cpLoc
+ )->gather(1);
+ }
(my $norm_format = $format) =~ s/(-full|-uris)$//o;
$recs = [ int($term) ];
} else {
$recs = $supercat->request(
- "open-ils.supercat.authority.$qualifier.startwith", $term, $page_size, $page
+ "open-ils.supercat.authority.startwith.by_axis",
+ $qualifier,
+ $term,
+ $page_size,
+ $page
)->gather(1);
}