[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface lonsearchcourse.pm

[raeburn]

raeburn		Thu Jul  4 17:30:17 2024 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonsearchcourse.pm 
  Log:
  - For 2.11
    Include one change from 1.8 and backport 1.14
  
  
Index: loncom/interface/lonsearchcourse.pm
diff -u loncom/interface/lonsearchcourse.pm:1.8 loncom/interface/lonsearchcourse.pm:1.8.2.1
--- loncom/interface/lonsearchcourse.pm:1.8	Sun Feb 11 20:32:42 2024
+++ loncom/interface/lonsearchcourse.pm	Thu Jul  4 17:30:17 2024
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Search Course
 #
-# $Id: lonsearchcourse.pm,v 1.8 2024/02/11 20:32:42 raeburn Exp $
+# $Id: lonsearchcourse.pm,v 1.8.2.1 2024/07/04 17:30:17 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -136,11 +136,12 @@
         foreach (sort(keys(%hash))) {
             if ($c->aborted()) { last; }
             if (($_=~/^src\_(.+)$/)) {
-                if ($hash{'randomout_'.$1} & !$env{'request.role.adv'}) {
+                my $rid = $1; 
+                if ($hash{'randomout_'.$rid} & !$env{'request.role.adv'}) {
                     next;
                 }
-                my $symb=&make_symb($1);
-                &checkonthis($r,$1,$hash{$_},0,&Apache::lonnet::gettitle($symb),
+                my $symb=&make_symb($rid);
+                &checkonthis($r,$rid,$hash{$_},0,&Apache::lonnet::gettitle($symb),
                              $fulltext,$symb, at allwords);
             }
         }