--- loncom/interface/lonhtmlcommon.pm 2004/11/19 20:17:52 1.97 +++ loncom/interface/lonhtmlcommon.pm 2004/11/23 14:53:05 1.98 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.97 2004/11/19 20:17:52 albertel Exp $ +# $Id: lonhtmlcommon.pm,v 1.98 2004/11/23 14:53:05 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -908,12 +908,12 @@ sub crumbs { unless ($_) { next; } $path.=$_; unless ($path eq $uri) { $path.='/'; } - my $linkpath=$path; - if ($form) { - my $escaped_path = &Apache::loncommon::escape_single($path); - $linkpath="javascript:$form.action='$escaped_path';$form.submit();"; - } - my $escaped_linkpath = &Apache::loncommon::escape_single($linkpath); + my $escaped_linkpath = &Apache::loncommon::escape_single($path); + if ($form) { + $escaped_linkpath="javascript:$form.action='". + &Apache::loncommon::escape_single($path). + "';$form.submit();"; + } my $escaped_target = &Apache::loncommon::escape_single($target); $output.=''.$_.'/'; }