--- loncom/interface/lonhtmlcommon.pm 2004/11/23 16:04:33 1.99
+++ loncom/interface/lonhtmlcommon.pm 2004/11/30 18:42:09 1.101
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.99 2004/11/23 16:04:33 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.101 2004/11/30 18:42:09 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -132,6 +132,9 @@ sub select_recent {
foreach (sort keys %recent) {
unless ($_=~/^error\:/) {
my $escaped = &Apache::loncommon::escape_url($_);
+ if ($_ =~ /\/$/ && $escaped !~ /\/$/) {
+ $escaped .= '/';
+ }
$return.="\n';
@@ -899,6 +902,10 @@ sub crumbs {
if (! defined($size)) {
$size = '+2';
}
+ if ($target) {
+ $target = ' target="'.
+ &Apache::loncommon::escape_single($target).'"';
+ }
my $output='';
unless ($noformat) { $output.='
'; }
$output.=''.$prefix.'/';
@@ -913,10 +920,6 @@ sub crumbs {
$linkpath=
qq{javascript:$form.action='$linkpath';$form.submit();};
}
- if ($target) {
- $target = ' target="'.
- &Apache::loncommon::escape_single($target).'"';
- }
$output.=qq{$dir/};
}
} else {