loncom/interface/domainprefs.pm - diff

Return to domainprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.156, 2011/10/22 02:00:46	version 1.157, 2011/10/23 23:46:02
Line 4934 sub publishlogo {	Line 4934 sub publishlogo {
# See if there is anything left	# See if there is anything left
unless ($fname) { return ('error: no uploaded file'); }	unless ($fname) { return ('error: no uploaded file'); }
$fname="$subdir/$fname";	$fname="$subdir/$fname";
my $filepath='/home/'.$confname.'/public_html';	my $filepath='/home/httpd/html/priv/'.$dom.'/'.$confname;
my ($fnamepath,$file,$fetchthumb);	my ($fnamepath,$file,$fetchthumb);
$file=$fname;	$file=$fname;
if ($fname=~m\|/\|) {	if ($fname=~m\|/\|) {