loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

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;
}	}