--- loncom/interface/portfolio.pm	2006/05/09 14:38:10	1.98
+++ loncom/interface/portfolio.pm	2006/05/18 01:08:52	1.99
@@ -30,6 +30,7 @@ use Apache::lontexconvert;
 use Apache::lonfeedback;
 use Apache::lonlocal;
 use Apache::lonnet;
+use Apache::longroup;
 
 # receives a file name and path stub from username/userfiles/portfolio/
 # returns an anchor tag consisting encoding filename and currentpath
@@ -501,7 +502,6 @@ sub upload {
     } else {
         my $result=&Apache::lonnet::userfileupload('uploaddoc','',
 	        	 $port_path.$env{'form.currentpath'});
-        print STDERR "result was $result for $port_path.$env{'form.currentpath'}\n";
         if ($result !~ m|^/uploaded/|) {
             $r->print('<font color="red"> An errror occured ('.$result.
 	              ') while trying to upload '.&display_file().'</font><br />');
@@ -650,7 +650,7 @@ sub handler {
         $group =~ s/\W//g;
         if ($group) {
             ($uname,$udom) = &get_name_dom($group);
-            my %curr_groups = &Apache::loncommon::coursegroups($udom,$uname,
+            my %curr_groups = &Apache::longroup::coursegroups($udom,$uname,
 							       $group); 
             if (%curr_groups) {
                 if (($view_permission) || (&Apache::lonnet::allowed('rgf',