From 94b1ca0fb18214261e28ea288ca84b61b6954763 Mon Sep 17 00:00:00 2001 From: Chris Nighswonger Date: Wed, 22 Feb 2012 14:42:56 -0500 Subject: [PATCH] Revert "Bug 6875 de-nesting C4::Heading" This reverts commit 0e61cfb3a591aec28521f2fdd1a76fea904721ca. -Unstable code --- C4/Heading.pm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/C4/Heading.pm b/C4/Heading.pm index d9e13d4223..ba9d23f6e0 100644 --- a/C4/Heading.pm +++ b/C4/Heading.pm @@ -23,6 +23,7 @@ use MARC::Record; use MARC::Field; use C4::Context; use C4::Heading::MARC21; +use C4::Search; use Carp; our $VERSION = 3.00; @@ -108,8 +109,7 @@ sub authorities { my $self = shift; my $query = qq(Match-heading,do-not-truncate,ext="$self->{'search_form'}"); $query .= $self->_query_limiters(); - require C4::Search; - my ($error, $results, $total_hits) = C4::Search::SimpleSearch( $query, undef, undef, [ "authorityserver" ] ); + my ($error, $results, $total_hits) = SimpleSearch( $query, undef, undef, [ "authorityserver" ] ); if (defined $error) { carp "Error:$error from search $query"; } @@ -129,8 +129,7 @@ sub preferred_authorities { my $self = shift; my $query = "Match-heading-see-from,do-not-truncate,ext='$self->{'search_form'}'"; $query .= $self->_query_limiters(); - require C4::Search; - my ($error, $results, $total_hits) = C4::Search::SimpleSearch( $query, undef, undef, [ "authorityserver" ] ); + my ($error, $results, $total_hits) = SimpleSearch( $query, undef, undef, [ "authorityserver" ] ); if (defined $error) { carp "Error:$error from search $query"; } -- 2.39.5