--- loncom/interface/lonquickgrades.pm 2011/03/25 01:34:49 1.78 +++ loncom/interface/lonquickgrades.pm 2011/03/25 22:06:34 1.79 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Quick Student Grades Display # -# $Id: lonquickgrades.pm,v 1.78 2011/03/25 01:34:49 www Exp $ +# $Id: lonquickgrades.pm,v 1.79 2011/03/25 22:06:34 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -497,6 +497,8 @@ sub process_category_edits { %categories=&del_category_content($1,$cangrade,$2,%categories); } elsif ($cmd=~/^newrule\_(.+)$/) { %categories=&add_calculation_rule($1,$cangrade,':',%categories); + } elsif ($cmd=~/^delrule\_(.+)\_\_\_\_\_\_(.*)$/) { + %categories=&del_calculation_rule($1,$cangrade,$2,%categories); } # Move to a new position my $moveid=$env{'form.storemove'}; @@ -615,7 +617,7 @@ ENDMOVE my ($code,$value)=split(/\:/,$calcrule); $r->print(&pretty_prt_rule($cangrade,$id,$code,$value)); if ($cangrade) { - $r->print(' '.&mt('Delete').''); + $r->print(' '.&mt('Delete').''); } $r->print(''); }