--- loncom/interface/londocs.pm 2011/09/10 03:18:34 1.459 +++ loncom/interface/londocs.pm 2011/10/23 23:46:02 1.461 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.459 2011/09/10 03:18:34 raeburn Exp $ +# $Id: londocs.pm,v 1.461 2011/10/23 23:46:02 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -176,7 +176,7 @@ sub dumpcourse { $newfilename=&clean($newfilename); $newfilename.='.'.$ext; my @dirs=split(/\//,$newfilename); - my $path='/home/'.$ca.'/public_html'; + my $path='/home/httpd/html/priv/'.$cd.'/'.$ca; my $makepath=$path; my $fail=0; for (my $i=0;$i<$#dirs;$i++) { @@ -1787,9 +1787,11 @@ sub editor { if ($supplementalflag) { $tid = 2; } - $r-print(&generate_edit_table($tid,$orderhash,$to_show)); if ($allowed) { + $r->print(&generate_edit_table($tid,$orderhash,$to_show)); &print_paste_buffer($r,$container); + } else { + $r->print($to_show); } return; }