--- loncom/interface/courseclassifier.pm 2015/05/21 23:26:34 1.22 +++ loncom/interface/courseclassifier.pm 2016/10/11 22:58:55 1.24 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Utilities for classifying courses based on institutional code # -# $Id: courseclassifier.pm,v 1.22 2015/05/21 23:26:34 raeburn Exp $ +# $Id: courseclassifier.pm,v 1.24 2016/10/11 22:58:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -575,7 +575,7 @@ function setElements() { } sub build_instcode_selectors { - my ($numtitles,$lasttitle,$cat_items,$codetitles,$cat_titles,$cat_order,$official,$class,$id) = @_; + my ($numtitles,$lasttitle,$cat_items,$codetitles,$cat_titles,$cat_order,$official,$class,$id,$noedit) = @_; my $output; my @standardnames = &Apache::loncommon::get_standard_codeitems(); if ($numtitles > 0) { @@ -586,6 +586,10 @@ sub build_instcode_selectors { if ($id eq '') { $id = 'instcodes'; } + my $disabled; + if ($noedit) { + $disabled = ' disabled="disabled"'; + } $output .= '
'.$codetitles->[$lasttitle-1].' '."\n". - ' |