--- loncom/homework/response.pm	2001/08/20 23:48:05	1.46
+++ loncom/homework/response.pm	2001/08/22 19:21:36	1.47
@@ -210,7 +210,7 @@ sub start_essayresponse {
 }
 
 sub view_or_modify {
-  my ($symb,$courseid,$domain,$name) = &Apache::lonhomework::whichuser();
+  my ($symb,$courseid,$domain,$name) = &Apache::lonxml::whichuser();
   my $myself=0;
   if ( ($name eq $ENV{'user.name'}) && ($domain eq $ENV{'user.domain'}) ) {
     $myself=1;
@@ -244,7 +244,7 @@ sub end_dataresponse {
   if ( $target eq 'web' ) {
   } elsif ($target eq 'grade' ) {
     if ( defined $ENV{'form.submitted'}) {
-      my ($symb,$courseid,$domain,$name)=&Apache::lonhomework::whichuser();
+      my ($symb,$courseid,$domain,$name)=&Apache::lonxml::whichuser();
       my $allowed=&Apache::lonnet::allowed('mgr',$courseid);
       if ($allowed) {
 	&Apache::response::setup_params('datasubmission');