loncom/interface/lonhelper.pm - diff

Return to lonhelper.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.107, 2005/07/07 04:19:20	version 1.108, 2005/07/07 04:32:59
Line 3336 sub render {	Line 3336 sub render {
if ($vars->{GRANULARITY} eq 'resource') {	if ($vars->{GRANULARITY} eq 'resource') {
$result .= "<input type='hidden' name='symb' value='".	$result .= "<input type='hidden' name='symb' value='".
HTML::Entities::encode($symb,"'<>&\"") . "' />\n";	HTML::Entities::encode($symb,"'<>&\"") . "' />\n";
	} elsif ($vars->{GRANULARITY} eq 'map') {
	$result .= "<input type='hidden' name='pschp' value='".
	$affectedResourceId."' />\n";
}	}
my $part = $vars->{RESOURCE_ID_part};	my $part = $vars->{RESOURCE_ID_part};
if ($part eq 'All Parts' \|\| !$part) { $part=0; }	if ($part eq 'All Parts' \|\| !$part) { $part=0; }
Line 3422 sub render {	Line 3425 sub render {

# Make the table appear	# Make the table appear
$result .= "\n<input type='hidden' value='true' name='prevvisit' />";	$result .= "\n<input type='hidden' value='true' name='prevvisit' />";
$result .= "\n<input type='hidden' value='all' name='pschp' />";
$result .= "\n<input type='hidden' value='$symb' name='pssymb' />";	$result .= "\n<input type='hidden' value='$symb' name='pssymb' />";
$result .= "\n<input type='hidden' value='$paramlevel' name='parmlev' />";	$result .= "\n<input type='hidden' value='$paramlevel' name='parmlev' />";