version 1.101, 2010/08/24 09:11:40
|
version 1.102, 2011/10/24 12:06:03
|
Line 645 ENDSMPHEAD
|
Line 645 ENDSMPHEAD
|
# ----------------------------------------------------------------- No such dir |
# ----------------------------------------------------------------- No such dir |
sub nodir { |
sub nodir { |
my ($r,$dir)=@_; |
my ($r,$dir)=@_; |
$dir=~s{^/home/$LONCAPA::username_re/public_html}{}; |
$dir=~s{^/home/httpd/html/priv/[^/]+/[^/]+}{}; |
my $brcrum = [{'href' => &Apache::loncommon::authorspace(), |
my $brcrum = [{'href' => &Apache::loncommon::authorspace(), |
'text' => 'Construction Space'}]; |
'text' => 'Construction Space'}]; |
# {'href' => '', |
# {'href' => '', |