--- loncom/publisher/londiff.pm 2009/05/14 14:24:18 1.27 +++ loncom/publisher/londiff.pm 2011/10/23 23:46:07 1.29 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to show differences between file versions # -# $Id: londiff.pm,v 1.27 2009/05/14 14:24:18 bisitz Exp $ +# $Id: londiff.pm,v 1.29 2011/10/23 23:46:07 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -114,7 +114,7 @@ sub handler { ' '.$efn.''); if (($cuname ne $env{'user.name'}) || ($cudom ne $env{'user.domain'})) { - $r->print('

' + $r->print('

' .&mt('Co-Author [_1]' ,&Apache::loncommon::plainname($cuname,$cudom) .' ('.$cuname.':'.$cudom.')') @@ -127,7 +127,7 @@ sub handler { || $efn =~ /\.meta$/) { $r->print('

'); if ($env{'form.versionone'} eq 'priv') { - my $fn='/home/'.$cuname.'/public_html/'.$efn; + my $fn='/home/httpd/html/priv/'.$cudom.'/'.$cuname.'/'.$efn; @f1=&get_split_file($fn,'local'); $r->print(''.&mt('Construction Space Version').''); } else { @@ -153,11 +153,11 @@ sub handler { if ($env{'form.filetwo'}) { my $efn2=$env{'form.filetwo'}; $efn2=~s{/\~($LONCAPA::username_re)}{}g; - my $fn='/home/'.$cuname.'/public_html/'.$efn2; + my $fn='/home/httpd/html/priv/'.$cudom.'/'.$cuname.'/'.$efn2; @f2=&get_split_file($fn,'local'); $r->print(''.$efn2.''); } elsif ($env{'form.versiontwo'} eq 'priv') { - my $fn='/home/'.$cuname.'/public_html/'.$efn; + my $fn='/home/httpd/html/priv/'.$cudom.'/'.$cuname.'/'.$efn; @f2=&get_split_file($fn,'local'); $r->print(''.&mt('Construction Space Version').''); } else {