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

Diff for /loncom/interface/courseclassifier.pm between versions 1.27 and 1.31

version 1.27, 2019/07/23 13:58:53 version 1.31, 2025/02/24 23:41:39
Line 69  sub recurse_list { Line 69  sub recurse_list {
                     push @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}}, $$codes{$cid}{$$codetitles[2]};                      push @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}}, $$codes{$cid}{$$codetitles[2]};
                 }                  }
             } else {              } else {
                 @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}");            }                  @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}");
               }
         } else {          } else {
             %{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}} = ();              %{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}} = ();
             @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}");              @{$$idarrays{$$codetitles[2]}{$$codes{$cid}{$$codetitles[0]}}{$$codes{$cid}{$$codetitles[1]}}} = ("$$codes{$cid}{$$codetitles[2]}");
Line 402  function toggleSecVis() { Line 403  function toggleSecVis() {
         showlist = 'inline';          showlist = 'inline';
         showbox = 'none';          showbox = 'none';
     }      }
     alert("crscode is ||"+crscode+"|| and currcode is ||"+currcode+"|| and showlist is ||"+showlist+"|| and showbox is ||"+showbox+"||");  
     if (document.getElementById('LC_helpdesk_sectionlist')) {      if (document.getElementById('LC_helpdesk_sectionlist')) {
         document.getElementById('LC_helpdesk_sectionlist').style.display = showlist;          document.getElementById('LC_helpdesk_sectionlist').style.display = showlist;
     }      }
     if (document.getElementById('LC_helpdesk_section')) {      if (document.getElementById('LC_helpdesk_section')) {
         document.getElementById('LC_helpdesk_section').style.display = showbox;          document.getElementById('LC_helpdesk_section').style.display = showbox;
     }      }
       if (document.getElementById('section')) {
           document.getElementById('section').id = 'wasinuse';
       }
       if (document.getElementById('notinuse') {
           document.getElementById('notinuse').id = 'section';
       }
       if (document.getElementById('wasinuse') {
           document.getElementById('wasinuse').id = 'notinuse';
       }
     return;      return;
 }  }
   
Line 528  sub instcode_selectors_data { Line 537  sub instcode_selectors_data {
             %{$cat_titles} = %{$instcats->{'cat_titles'}};              %{$cat_titles} = %{$instcats->{'cat_titles'}};
             %{$cat_order} = %{$instcats->{'cat_order'}};              %{$cat_order} = %{$instcats->{'cat_order'}};
             $totcodes = scalar(keys(%{$codes}));              $totcodes = scalar(keys(%{$codes}));
               if ((!$totcodes) && (exists($instcats->{'totcodes'}))) {
                   $totcodes = $instcats->{'totcodes'};
               }
             &build_code_selections($codes,$codetitles,$cat_titles,$cat_order,              &build_code_selections($codes,$codetitles,$cat_titles,$cat_order,
                                    \%idlist,\%idnums,\%idlist_titles);                                     \%idlist,\%idnums,\%idlist_titles);
             my ($scripttext,$longtitles) =               my ($scripttext,$longtitles) =
                 &javascript_definitions($codetitles,\%idlist,\%idlist_titles,                  &javascript_definitions($codetitles,\%idlist,\%idlist_titles,
                                         \%idnums,$cat_titles);                                          \%idnums,$cat_titles);
             my $longtitles_str = join('","',@{$longtitles});              my $longtitles_str = join('","',@{$longtitles});
Removed from v.1.27  
changed lines
  Added in v.1.31

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