loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.275, 2010/06/09 14:55:22	version 1.277, 2010/06/10 09:09:59
Line 927 Returns: none	Line 927 Returns: none

=item Increment_PrgWin	=item Increment_PrgWin

Increment the count of items completed for the progress window by 1.	Increment the count of items completed for the progress window by $step or 1 if no step is provided.

Inputs:	Inputs:

Line 940 Inputs:	Line 940 Inputs:
=item $extraInfo A description of the items being iterated over. Typically	=item $extraInfo A description of the items being iterated over. Typically
'student'.	'student'.

	=item $step (optional) counter step. Will be set to default 1 if ommited.

=back	=back

Returns: none	Returns: none
Line 1050 sub Update_PrgWin {	Line 1052 sub Update_PrgWin {
# increment progress state	# increment progress state
sub Increment_PrgWin {	sub Increment_PrgWin {
my ($r,$prog_state,$extraInfo,$step)=@_;	my ($r,$prog_state,$extraInfo,$step)=@_;
if ($step !~ /^\d+$/) {	if ( ($step == 0) \|\| ($step !~ /^\d+(\.\d+)*$/) ) {
$step = 1; # default	$step = 1; # default
}	}
$$prog_state{'done'} += $step;	$$prog_state{'done'} += $step;