loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.97, 2004/11/19 20:17:52	version 1.98, 2004/11/23 14:53:05
Line 908 sub crumbs {	Line 908 sub crumbs {
unless ($_) { next; }	unless ($_) { next; }
$path.=$_;	$path.=$_;
unless ($path eq $uri) { $path.='/'; }	unless ($path eq $uri) { $path.='/'; }
my $linkpath=$path;	my $escaped_linkpath = &Apache::loncommon::escape_single($path);
if ($form) {	if ($form) {
my $escaped_path = &Apache::loncommon::escape_single($path);	$escaped_linkpath="javascript:$form.action='".
$linkpath="javascript:$form.action='$escaped_path';$form.submit();";	&Apache::loncommon::escape_single($path).
}	"';$form.submit();";
my $escaped_linkpath = &Apache::loncommon::escape_single($linkpath);	}
my $escaped_target = &Apache::loncommon::escape_single($target);	my $escaped_target = &Apache::loncommon::escape_single($target);
$output.='<a href="'.$escaped_linkpath.'"'.($target?' target="'.$escaped_target.'"':'').'>'.$_.'</a>/';	$output.='<a href="'.$escaped_linkpath.'"'.($target?' target="'.$escaped_target.'"':'').'>'.$_.'</a>/';
}	}