--- loncom/interface/portfolio.pm	2008/04/16 23:11:06	1.191
+++ loncom/interface/portfolio.pm	2008/04/17 14:46:18	1.192
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # portfolio browser
 #
-# $Id: portfolio.pm,v 1.191 2008/04/16 23:11:06 raeburn Exp $
+# $Id: portfolio.pm,v 1.192 2008/04/17 14:46:18 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2336,7 +2336,7 @@ sub handler {
             &Apache::lonhtmlcommon::clear_breadcrumbs();
             $r->print(&coursegrp_portfolio_header($udom,$uname,$grp_desc));
         }
-        my @dir_list=&get_dir_list($portfolio_root,undef,$group);
+        my @dir_list=&get_dir_list($portfolio_root,$current_path,$group);
 	if ($dir_list[0] eq 'no_such_dir'){
 	    # two main reasons for this:
             #    1) never been here, so directory structure not created
@@ -2352,9 +2352,7 @@ sub handler {
 		$current_path = '/'; # force it back to the root        
 	    }
 	    # now grab the directory list again, for the first time
-	    @dir_list=
-                &Apache::lonnet::dirlist($portfolio_root.$current_path,
-                                         $udom,$uname,$getpropath);
+            @dir_list=&get_dir_list($portfolio_root,$current_path,$group);
         }
 	# need to know if directory is empty so it can be removed if desired
 	my $is_empty=(@dir_list == 2);