--- loncom/interface/lonsearchcat.pm 2016/08/04 21:23:57 1.331.4.12 +++ loncom/interface/lonsearchcat.pm 2016/08/04 20:59:22 1.349 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Search Catalog # -# $Id: lonsearchcat.pm,v 1.331.4.12 2016/08/04 21:23:57 raeburn Exp $ +# $Id: lonsearchcat.pm,v 1.349 2016/08/04 20:59:22 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -433,7 +433,7 @@ sub hidden_field { =pod =over 4 - + =item &print_basic_search_form() Prints the form for the basic search. Sorry the name is so cryptic. @@ -2052,21 +2052,7 @@ sub print_sort_form { &Apache::lonnet::logthis(&Apache::lonmysql::get_error()); return; } - my $js =< -// - -END - - my $start_page = &Apache::loncommon::start_page('Results'); + my $start_page = &Apache::loncommon::start_page('Results',undef); my $breadcrumbs= &Apache::lonhtmlcommon::breadcrumbs('Searching','Searching', $env{'form.catalogmode'} ne 'import'); @@ -2472,7 +2458,7 @@ END &update_status($r, &mt('waiting on [_1]',join(' ',keys(%Server_status)))); } - sleep(0.1); + sleep(0.1); } # # Loop through the servers we have contacted but do not @@ -2657,11 +2643,11 @@ sub display_results { &Apache::loncommon::end_page()); $r->rflush(); return; - } + } # untie %groupsearch_db if the connection gets aborted before the end $r->register_cleanup(sub { untie %groupsearch_db if (tied(%groupsearch_db)); - }); + }); } ## ## Prepare the table for querying @@ -3214,7 +3200,6 @@ sub print_frames_interface { my $results_link = &results_link(); my $js = < -// JS @@ -3548,18 +3532,13 @@ sub display_url { # (because the search opens in a new window, it gets # confusing when the links open a tab in the # parent window; ideally we should not force windows) - my $onclick = " onclick=\"window.open(this.href, '_blank', 'toolbar=1,location=1,menubar=0');return false;\""; + my $onclick = " onclick=\"window.open(this.href, '_blank', 'toolbar=1,location=1,menubar=0');return false;\""; $link=&Apache::lonhtmlcommon::crumbs( $url, 'preview', '', - (($env{'form.catalogmode'} eq 'import')?'parent.statusframe.document.forms.statusform':''), + '', $skiplast,$onclick).' '; - # replace the links to open in a new window - # (because the search opens in a new window, it gets - # confusing when the links open a tab in the - # parent window; ideally we should not force windows) - $link =~ s/(href="[^"]*")/\1 onclick="window.open(this.href, '_blank', 'toolbar=1,location=1,menubar=0');return false;"/g; } return $link; }