[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm
raeburn
lon-capa-cvs@mail.lon-capa.org
Wed, 01 Dec 2004 23:18:24 -0000
raeburn Wed Dec 1 18:18:24 2004 EDT
Modified files:
/loncom/interface loncommon.pm
Log:
Fix bug #3655.
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.236 loncom/interface/loncommon.pm:1.237
--- loncom/interface/loncommon.pm:1.236 Tue Nov 30 17:57:16 2004
+++ loncom/interface/loncommon.pm Wed Dec 1 18:18:23 2004
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.236 2004/11/30 22:57:16 albertel Exp $
+# $Id: loncommon.pm,v 1.237 2004/12/01 23:18:23 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2606,8 +2606,8 @@
($ENV{'request.filename'} =~ m|^/home/([^/]+)/public_html/(.*)|);
my $formaction='/priv/'.$uname.'/'.$thisdisfn;
$formaction=~s/\/+/\//g;
- unless ($customtitle) {
- my $parentpath = $thisdisfn;
+ unless ($customtitle) { #this is for resources; directories have customtitle, and crumbs and select recent are created in lonpubdir.pm
+ my $parentpath = '';
if ($thisdisfn =~ m-(.+/)[^/]*$-) {
$parentpath = $1;
}