--- loncom/publisher/loncfile.pm 2011/11/07 13:38:45 1.106.2.1 +++ loncom/publisher/loncfile.pm 2011/10/22 21:25:37 1.107 @@ -9,7 +9,7 @@ # and displays a page showing the results of the action. # # -# $Id: loncfile.pm,v 1.106.2.1 2011/11/07 13:38:45 raeburn Exp $ +# $Id: loncfile.pm,v 1.107 2011/10/22 21:25:37 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -175,7 +175,8 @@ sub url { sub display { my $fn=shift; - $fn=~s-^/home/($match_username)/public_html-/priv/$1-; + $fn=~s/^\/home\/httpd\/html//; + $fn=~s/\/\.\//\//g; return ''.$fn.''; } @@ -1475,7 +1476,7 @@ function writeDone() { |; $loaditem{'onload'} = "writeDone()"; } - + # Breadcrumbs &Apache::lonhtmlcommon::clear_breadcrumbs(); &Apache::lonhtmlcommon::add_breadcrumb({ @@ -1493,7 +1494,7 @@ function writeDone() { {'add_entries' => \%loaditem,}) .&Apache::lonhtmlcommon::breadcrumbs() .&Apache::loncommon::head_subbox( - &Apache::loncommon::CSTR_pageheader($fn)) + &Apache::loncommon::CSTR_pageheader()) ); $r->print('

'.&mt('Location').': '.&display($fn).'

');