[LON-CAPA-cvs] cvs: loncom /interface lonaboutme.pm
raeburn
lon-capa-cvs-allow@mail.lon-capa.org
Thu, 11 Sep 2008 02:07:30 -0000
raeburn Wed Sep 10 22:07:30 2008 EDT
Modified files:
/loncom/interface lonaboutme.pm
Log:
Args in call to lonnet::dirlist() needed changing now propath calls have moved to lond.
Index: loncom/interface/lonaboutme.pm
diff -u loncom/interface/lonaboutme.pm:1.69 loncom/interface/lonaboutme.pm:1.70
--- loncom/interface/lonaboutme.pm:1.69 Sun Jan 20 17:25:05 2008
+++ loncom/interface/lonaboutme.pm Wed Sep 10 22:07:27 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# "About Me" Personal Information
#
-# $Id: lonaboutme.pm,v 1.69 2008/01/20 22:25:05 raeburn Exp $
+# $Id: lonaboutme.pm,v 1.70 2008/09/11 02:07:27 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -620,9 +620,10 @@
my $portfolio_root = &Apache::portfolio::get_portfolio_root($cdom,$cnum,
$group);
+ my $getpropath = 1;
my %dirlist = map {
((split('&',$_,2))[0],1)
- } &Apache::lonnet::dirlist($path,$cdom,$cnum,$portfolio_root);
+ } &Apache::lonnet::dirlist($portfolio_root.$path,$cdom,$cnum,$getpropath);
foreach my $item (sort(keys(%{$currhash}))) {
$output .= &portfolio_row_start();
$output .= '<td style="padding-left: '.($depth*25).'px">';