loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.163, 2002/03/29 18:32:46	version 1.164, 2002/04/03 18:47:39
Line 176 sub xmlend {	Line 176 sub xmlend {
}	}
my $sender='Anonymous';	my $sender='Anonymous';
if ((!$contrib{$idx.':anonymous'}) \|\| ($seeid)) {	if ((!$contrib{$idx.':anonymous'}) \|\| ($seeid)) {
$sender=$contrib{$idx.':sendername'}.' at '.	$sender=$contrib{$idx.':plainname'}.' ('.
$contrib{$idx.':senderdomain'};	$contrib{$idx.':sendername'}.' at '.
	$contrib{$idx.':senderdomain'}.')';
if ($contrib{$idx.':anonymous'}) {	if ($contrib{$idx.':anonymous'}) {
$sender.=' (anonymous)';	$sender.=' [anonymous] '.
	$contrib{$idx.':screenname'};
}	}
if ($seeid) {	if ($seeid) {
if ($hidden) {	if ($hidden) {
Line 190 sub xmlend {	Line 192 sub xmlend {
$symb.':::'.$idx.'">Hide</a>';	$symb.':::'.$idx.'">Hide</a>';
}	}
}	}
	} else {
	if ($contrib{$idx.':screenname'}) {
	$sender='<i>'.$contrib{$idx.':screenname'}.'</i>';
	}
}	}
$discussion.='<p><b>'.$sender.'</b> ('.	$discussion.='<p><b>'.$sender.'</b> ('.
localtime($contrib{$idx.':timestamp'}).	localtime($contrib{$idx.':timestamp'}).