loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.437, 2009/10/26 10:16:56	version 1.438, 2009/11/02 12:10:34
Line 505 my %statusIconMap =	Line 505 my %statusIconMap =
$resObj->ERROR => ''	$resObj->ERROR => ''
);	);

my %iconAltTags =	my %iconAltTags = #texthash does not work here
( 'navmap.correct.gif' => 'Correct',	( 'navmap.correct.gif' => 'Correct',
'navmap.wrong.gif' => 'Incorrect',	'navmap.wrong.gif' => 'Incorrect',
'navmap.open.gif' => 'Open' );	'navmap.open.gif' => 'Open',
	'navmap.partial.gif' => 'Partially Correct', );

# Defines a status->color mapping, null string means don't color	# Defines a status->color mapping, null string means don't color
my %colormap =	my %colormap =
Line 1091 sub render_quick_status {	Line 1092 sub render_quick_status {
if ($icon) {	if ($icon) {
my $location=	my $location=
&Apache::loncommon::lonhttpdurl("/adm/lonIcons/$icon");	&Apache::loncommon::lonhttpdurl("/adm/lonIcons/$icon");
$result .= "$linkopen<img src='$location' alt='$alt' />$linkclose";	$result .= $linkopen.'<img src="'.$location.'" alt="'.&mt($alt).'" title="'.&mt($alt).'" />'.$linkclose;
} else {	} else {
$result .= " ";	$result .= " ";
}	}