[BACK]Return to lonsearchcat.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonsearchcat.pm between versions 1.331.4.16.2.1 and 1.331.4.16.2.2

version 1.331.4.16.2.1, 2022/05/29 21:59:55 version 1.331.4.16.2.2, 2023/12/30 03:56:48
Line 176  sub handler { Line 176  sub handler {
     }       } 
     my $crumb_text = 'Portfolio Search';      my $crumb_text = 'Portfolio Search';
     if (@allowed_searches ==2) {      if (@allowed_searches ==2) {
        $crumb_text = 'Portfolio and Catalog Search';          $crumb_text = 'Portfolio and Content Library Search'; 
     }      }
     my $target = '_top';      my $target = '_top';
     if ((($env{'request.lti.login'}) && ($env{'request.lti.target'} eq 'iframe')) ||      if ((($env{'request.lti.login'}) && ($env{'request.lti.target'} eq 'iframe')) ||
Line 308  END Line 308  END
     }      }
     #      #
     if ($env{'form.searchmode'} eq 'advanced') {      if ($env{'form.searchmode'} eq 'advanced') {
         my $srchtype = 'Catalog';          my $srchtype = 'Content Library';
         if ($env{'form.area'} eq 'portfolio') {          if ($env{'form.area'} eq 'portfolio') {
             $srchtype = 'Portfolio';              $srchtype = 'Portfolio';
         }          }
Line 474  sub setup_basic_search { Line 474  sub setup_basic_search {
     my ($r,$area,$hidden_fields,$closebutton) = @_;      my ($r,$area,$hidden_fields,$closebutton) = @_;
     # Define interface components      # Define interface components
     my %lt = &Apache::lonlocal::texthash (      my %lt = &Apache::lonlocal::texthash (
                               res => 'LON-CAPA Catalog Search',                                res => 'Content Library Search',
                               portfolio => 'Portfolio Search',                                portfolio => 'Portfolio Search',
     );      );
     my ($userelatedwords,$onlysearchdomain,$inclext,$adv_search_link,$scrout);      my ($userelatedwords,$onlysearchdomain,$inclext,$adv_search_link,$scrout);
Line 599  sub print_advanced_search_form{ Line 599  sub print_advanced_search_form{
 $closebutton  $closebutton
 </p>  </p>
 END  END
     my $srchtype = 'Catalog';      my $srchtype = 'Content Library';
     my $jscript;      my $jscript;
     if ($env{'form.area'} eq 'portfolio') {      if ($env{'form.area'} eq 'portfolio') {
         $srchtype = 'Portfolio';          $srchtype = 'Portfolio';
Line 2578  END Line 2578  END
   
                     if ($area eq 'portfolio') {                      if ($area eq 'portfolio') {
                         next if (defined($matches{$Fields{'url'}}));                          next if (defined($matches{$Fields{'url'}}));
                         # Skip if inaccessible                          # Skip unless access control set to public or passphrase-protected
                         next if (!&Apache::lonnet::portfolio_access($Fields{'url'}));                          next unless (($Fields{'scope'} eq 'public') || ($Fields{'scope'} eq 'guest'));
                         $matches{$Fields{'url'}} = 1;                           $matches{$Fields{'url'}} = 1; 
                     }                      }
                     #                      #
Removed from v.1.331.4.16.2.1  
changed lines
  Added in v.1.331.4.16.2.2

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>