loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.194, 2003/05/29 17:39:41	version 1.195, 2003/06/10 15:45:16
Line 1021 sub render_long_status {	Line 1021 sub render_long_status {
$result .= '(randomly select ' . $resource->randompick() .')';	$result .= '(randomly select ' . $resource->randompick() .')';
}	}

$result .= " </td>\n";	$result .= " - $part  </td>\n";

return $result;	return $result;
}	}
Line 1588 sub new {	Line 1588 sub new {
return undef;	return undef;
}	}

$self->{NAV_HASH} = \%navmaphash;	# try copying into memory
	my %tmpnavhash;
	while (my ($k, $v) = each(%navmaphash)) {
	$tmpnavhash{$k} = $v;
	}
	untie %navmaphash;

	$self->{NAV_HASH} = \%tmpnavhash;
$self->{PARM_HASH} = \%parmhash;	$self->{PARM_HASH} = \%parmhash;
$self->{INITED} = 0;	$self->{INITED} = 0;