--- loncom/interface/lonsearchcat.pm 2023/12/30 03:56:48 1.331.4.16.2.2 +++ loncom/interface/lonsearchcat.pm 2024/07/04 17:21:22 1.331.4.17 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Search Catalog # -# $Id: lonsearchcat.pm,v 1.331.4.16.2.2 2023/12/30 03:56:48 raeburn Exp $ +# $Id: lonsearchcat.pm,v 1.331.4.17 2024/07/04 17:21:22 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -176,16 +176,7 @@ sub handler { } my $crumb_text = 'Portfolio Search'; if (@allowed_searches ==2) { - $crumb_text = 'Portfolio and Content Library Search'; - } - my $target = '_top'; - if ((($env{'request.lti.login'}) && ($env{'request.lti.target'} eq 'iframe')) || - (($env{'request.deeplink.login'}) && ($env{'request.deeplink.target'} eq '_self'))) { - if ($env{'form.phase'} =~ /^(sort|run_search)$/) { - $target = '_parent'; - } else { - $target = '_self'; - } + $crumb_text = 'Portfolio and Catalog Search'; } &Apache::lonhtmlcommon::add_breadcrumb ({href=>'/adm/searchcat?'. @@ -194,7 +185,7 @@ sub handler { '&launch='.$env{'form.launch'}. '&mode='.$env{'form.mode'}, text=>"$crumb_text", - target=>$target, + target=>'_top', bug=>'Searching',}); # if ($env{'form.phase'} !~ m/(basic|adv|course)_search/) { @@ -308,7 +299,7 @@ END } # if ($env{'form.searchmode'} eq 'advanced') { - my $srchtype = 'Content Library'; + my $srchtype = 'Catalog'; if ($env{'form.area'} eq 'portfolio') { $srchtype = 'Portfolio'; } @@ -337,10 +328,10 @@ END ['query','customquery','customshow', 'libraries','pretty_string','domains']); if ($env{'form.phase'} eq 'sort') { - &print_sort_form($r,$pretty_string,$target); + &print_sort_form($r,$pretty_string); } elsif ($env{'form.phase'} eq 'run_search') { &run_search($r,$query,$customquery,$customshow, - $libraries,$pretty_string,$env{'form.area'},$domainsref,$target); + $libraries,$pretty_string,$env{'form.area'},$domainsref); } } elsif(($env{'form.phase'} eq 'basic_search') || ($env{'form.phase'} eq 'adv_search')) { @@ -474,7 +465,7 @@ sub setup_basic_search { my ($r,$area,$hidden_fields,$closebutton) = @_; # Define interface components my %lt = &Apache::lonlocal::texthash ( - res => 'Content Library Search', + res => 'LON-CAPA Catalog Search', portfolio => 'Portfolio Search', ); my ($userelatedwords,$onlysearchdomain,$inclext,$adv_search_link,$scrout); @@ -599,7 +590,7 @@ sub print_advanced_search_form{ $closebutton

END - my $srchtype = 'Content Library'; + my $srchtype = 'Catalog'; my $jscript; if ($env{'form.area'} eq 'portfolio') { $srchtype = 'Portfolio'; @@ -2061,7 +2052,7 @@ a link to change the search query. ###################################################################### ###################################################################### sub print_sort_form { - my ($r,$pretty_query_string,$target) = @_; + my ($r,$pretty_query_string) = @_; ## my %SortableFields=&Apache::lonlocal::texthash( @@ -2108,20 +2099,15 @@ sub print_sort_form { END - my $args; - if ($target eq '_parent') { - $args = {'links_target' => $target}; - } - my $start_page = &Apache::loncommon::start_page('Results',undef,$args); + my $start_page = &Apache::loncommon::start_page('Results'); my $breadcrumbs= &Apache::lonhtmlcommon::breadcrumbs('Searching','Searching', - $env{'form.catalogmode'} ne 'import', - '','','','','','',$target); + $env{'form.catalogmode'} ne 'import'); my $result = < +
END @@ -2372,7 +2358,7 @@ results into MySQL. ###################################################################### sub run_search { my ($r,$query,$customquery,$customshow,$serverlist, - $pretty_string,$area,$domainsref,$target) = @_; + $pretty_string,$area,$domainsref) = @_; my $tabletype = 'metadata'; if ($area eq 'portfolio') { $tabletype = 'portfolio_search'; @@ -2381,15 +2367,10 @@ sub run_search { # # Print run_search header # - my $args; - if ($target eq '_parent') { - $args = {'links_target' => $target}; - } - my $start_page = &Apache::loncommon::start_page('Search Status',undef,$args); + my $start_page = &Apache::loncommon::start_page('Search Status',undef); my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs('Searching','Searching', - $env{'form.catalogmode'} ne 'import', - '','','','','','',$target); + $env{'form.catalogmode'} ne 'import'); $r->print(<