--- loncom/interface/courseclassifier.pm 2009/05/01 01:30:08 1.6 +++ loncom/interface/courseclassifier.pm 2009/05/05 05:30:00 1.7 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Utilities for classifying courses based on institutional code # -# $Id: courseclassifier.pm,v 1.6 2009/05/01 01:30:08 raeburn Exp $ +# $Id: courseclassifier.pm,v 1.7 2009/05/05 05:30:00 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -445,7 +445,7 @@ END } sub instcode_selectors_data { - my ($codedom,$formname,$cat_items,$codetitles,$cat_titles,$cat_order) = @_; + my ($codedom,$formname,$cat_items,$codetitles,$cat_titles,$cat_order,$officialjs) = @_; my ($jscript,%coursecodes,%codes,%idlist,%idnums,%idlist_titles, %by_year,%by_sem,%by_dept); my ($numtitles,$lasttitle); @@ -478,7 +478,35 @@ sub instcode_selectors_data { $level = &recurse_options($codetitles->[$k],$idlist{$codetitles->[$k]},$level,$cat,$cat_items,\@data,\%by_year,\%by_sem,\%by_dept); } $scripttext .= &build_javascript(\%by_year,\%by_sem,\%by_dept,$cat_order,$codetitles); - $jscript .= &javascript_select_filler($formname,$scripttext,$codetitles,$longtitles_str,$allidlist); + if ($officialjs) { + $jscript .= ' + +function toggleOfficial() {'; + for (my $i=0; $i<@{$codetitles}-1; $i++) { + $jscript .= ' + document.'.$formname.'.'.$codetitles->[$i].'.selectedIndex = 0;'; + } + $jscript .= ' +} + +function setOfficial(caller) { + if (caller.options[caller.selectedIndex].value != 0) { + if (document.'.$formname.'.official.length > 0) { + for (var j=0; j'.$codetitles->[$k].'
'."\n". - '