version 1.42, 2010/12/14 16:26:04
|
version 1.42.2.1, 2011/11/07 13:38:45
|
Line 292 sub handler {
|
Line 292 sub handler {
|
|
|
my $r=shift; |
my $r=shift; |
|
|
my $fn; |
my ($fn,$trailfile); |
|
|
|
|
# Get query string for limited number of parameters |
# Get query string for limited number of parameters |
Line 330 sub handler {
|
Line 330 sub handler {
|
} |
} |
|
|
$fn=~s{/~($LONCAPA::username_re)}{}; |
$fn=~s{/~($LONCAPA::username_re)}{}; |
|
$trailfile = "/home/$uname/public_html".$fn; |
|
|
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
Line 348 sub handler {
|
Line 349 sub handler {
|
$r->print(&Apache::loncommon::start_page('Retrieve Published Resources') |
$r->print(&Apache::loncommon::start_page('Retrieve Published Resources') |
.&Apache::lonhtmlcommon::breadcrumbs() |
.&Apache::lonhtmlcommon::breadcrumbs() |
.&Apache::loncommon::head_subbox( |
.&Apache::loncommon::head_subbox( |
&Apache::loncommon::CSTR_pageheader()) # FIXME crumbs broken? |
&Apache::loncommon::CSTR_pageheader($trailfile)) |
); |
); |
|
|
$r->print('<p>' |
$r->print('<p>' |