loncom/publisher/lonpublisher.pm - diff

Return to lonpublisher.pm CVS log

Up to [LON-CAPA] / loncom / publisher

version 1.275, 2011/10/31 17:27:10	version 1.278, 2012/01/29 03:08:32
Line 1880 sub publishdirectory {	Line 1880 sub publishdirectory {
$thisdisfn=~s/\/+/\//g;	$thisdisfn=~s/\/+/\//g;
my $thisdisresdir=$thisdisfn;	my $thisdisresdir=$thisdisfn;
$thisdisresdir=~s/^\/priv\//\/res\//;	$thisdisresdir=~s/^\/priv\//\/res\//;
my $resdir='/home/httpd/html'.$thisdisresdir;	my $resdir = $r->dir_config('lonDocRoot').$thisdisresdir;
$r->print(&Apache::lonhtmlcommon::start_pick_box()	$r->print(&Apache::lonhtmlcommon::start_pick_box()
.&Apache::lonhtmlcommon::row_title(&mt('Directory'))	.&Apache::lonhtmlcommon::row_title(&mt('Directory'))
.'<span class="LC_filename">'.$thisdisfn.'</span>'	.'<span class="LC_filename">'.$thisdisfn.'</span>'
Line 2144 sub handler {	Line 2144 sub handler {
&Apache::lonhtmlcommon::clear_breadcrumbs();	&Apache::lonhtmlcommon::clear_breadcrumbs();
&Apache::lonhtmlcommon::add_breadcrumb({	&Apache::lonhtmlcommon::add_breadcrumb({
'text' => 'Construction Space',	'text' => 'Construction Space',
'href' => &Apache::loncommon::authorspace(),	'href' => &Apache::loncommon::authorspace($fn),
});	});
&Apache::lonhtmlcommon::add_breadcrumb({	&Apache::lonhtmlcommon::add_breadcrumb({
'text' => 'Resource Publication',	'text' => 'Resource Publication',