Attachment #36073 for bug #12858

View | Details | Raw Unified | Return to bug 12858
Collapse All | Expand All

Lines 63-69 Get Summary data from Syndetics Link Here

(-)a/C4/External/Syndetics.pm (-3 / +4 lines)
63	=cut	63	=cut
64		64
65	sub get_syndetics_index {	65	sub get_syndetics_index {
66	my ( $isbn,$upc,$oclc ) = @_;	66	my ( $isbn, $upc, $oclc ) = @_;
		67
		68	return unless( $isbn \|\| $upc \|\| $oclc );
67		69
68	my $response = _fetch_syndetics_content('INDEX.XML', $isbn, $upc, $oclc);	70	my $response = _fetch_syndetics_content('INDEX.XML', $isbn, $upc, $oclc);
69	unless ($response->content_type =~ /xml/) {	71	unless ($response->content_type =~ /xml/) {
Lines 80-88 sub get_syndetics_index { Link Here
80	for my $available_type ('SUMMARY','TOC','FICTION','AWARDS1','SERIES1','SPSUMMARY','SPREVIEW', 'AVPROFILE', 'AVSUMMARY','DBCHAPTER','LJREVIEW','PWREVIEW','SLJREVIEW','CHREVIEW','BLREVIEW','HBREVIEW','KIREVIEW','CRITICASREVIEW','ANOTES') {	82	for my $available_type ('SUMMARY','TOC','FICTION','AWARDS1','SERIES1','SPSUMMARY','SPREVIEW', 'AVPROFILE', 'AVSUMMARY','DBCHAPTER','LJREVIEW','PWREVIEW','SLJREVIEW','CHREVIEW','BLREVIEW','HBREVIEW','KIREVIEW','CRITICASREVIEW','ANOTES') {
81	if (exists $response->{$available_type} && $response->{$available_type} =~ /$available_type/) {	83	if (exists $response->{$available_type} && $response->{$available_type} =~ /$available_type/) {
82	$syndetics_elements->{$available_type} = $available_type;	84	$syndetics_elements->{$available_type} = $available_type;
83	#warn "RESPONSE: $available_type : $response->{$available_type}";
84	}	85	}
85	}	86	}
		87
86	return $syndetics_elements if $syndetics_elements;	88	return $syndetics_elements if $syndetics_elements;
87	}	89	}
88		90
89	-

Return to bug 12858