--- loncom/interface/lonsource.pm	2009/08/13 11:00:38	1.24
+++ loncom/interface/lonsource.pm	2011/10/25 14:28:13	1.25
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Source Code handler
 #
-# $Id: lonsource.pm,v 1.24 2009/08/13 11:00:38 raeburn Exp $
+# $Id: lonsource.pm,v 1.25 2011/10/25 14:28:13 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -84,10 +84,10 @@ sub copy_stage {
         $author_name = $env{'user.name'};
     }
 
-    my $path_to_new_file = '/home/'.$author_name.'/public_html/'.$newpath.'/'.$listname;
+    my $path_to_new_file = '/home/httpd/html/priv/'.$domain.'/'.$author_name.'/'.$newpath.'/'.$listname;
 #Just checking again for access as we want to make sure that it is really ok now that we have the real path
 
-    my ($uname,$udom)= &Apache::loncacc::constructaccess($path_to_new_file,$domain);
+    my ($uname,$udom)= &Apache::loncacc::constructaccess($path_to_new_file);
 
     if (!$uname || !$udom) {
 	$r->print(&Apache::loncommon::start_page('Not Allowed'));