version 1.236, 2004/11/30 22:57:16
|
version 1.237, 2004/12/01 23:18:23
|
Line 2606 ENDROLE
|
Line 2606 ENDROLE
|
($ENV{'request.filename'} =~ m|^/home/([^/]+)/public_html/(.*)|); |
($ENV{'request.filename'} =~ m|^/home/([^/]+)/public_html/(.*)|); |
my $formaction='/priv/'.$uname.'/'.$thisdisfn; |
my $formaction='/priv/'.$uname.'/'.$thisdisfn; |
$formaction=~s/\/+/\//g; |
$formaction=~s/\/+/\//g; |
unless ($customtitle) { |
unless ($customtitle) { #this is for resources; directories have customtitle, and crumbs and select recent are created in lonpubdir.pm |
my $parentpath = $thisdisfn; |
my $parentpath = ''; |
if ($thisdisfn =~ m-(.+/)[^/]*$-) { |
if ($thisdisfn =~ m-(.+/)[^/]*$-) { |
$parentpath = $1; |
$parentpath = $1; |
} |
} |