loncom/interface/lonquickgrades.pm - diff

Return to lonquickgrades.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.72, 2011/03/09 00:35:57	version 1.73, 2011/03/09 01:46:08
Line 471 sub process_category_edits {	Line 471 sub process_category_edits {
%categories=&move_down_category($1,$cangrade,%categories);	%categories=&move_down_category($1,$cangrade,%categories);
} elsif ($cmd=~/^delcat\_(.+)$/) {	} elsif ($cmd=~/^delcat\_(.+)$/) {
%categories=&del_category($1,$cangrade,%categories);	%categories=&del_category($1,$cangrade,%categories);
	}
	# Move to a new position
	my $moveid=$env{'form.storemove'};
	if ($moveid) {
	%categories=&move_category($moveid,$cangrade,$env{'form.newpos_'.$moveid},%categories);
}	}
return %categories;	return %categories;
}	}