loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

Diff for /loncom/xml/lonxml.pm between versions 1.195 and 1.196

version 1.195, 2002/09/11 13:36:50	version 1.196, 2002/09/13 20:46:09
Line 186 sub xmlend {	Line 186 sub xmlend {
if ($hidden) {	if ($hidden) {
$message='<font color="#888888">'.$message.'</font>';	$message='<font color="#888888">'.$message.'</font>';
}	}
	my $screenname=&Apache::loncommon::screenname(
	$contrib{$idx.':sendername'},
	$contrib{$idx.':senderdomain'});
	my $plainname=&Apache::loncommon::nickname(
	$contrib{$idx.':sendername'},
	$contrib{$idx.':senderdomain'});

my $sender='Anonymous';	my $sender='Anonymous';
if ((!$contrib{$idx.':anonymous'}) \|\| ($seeid)) {	if ((!$contrib{$idx.':anonymous'}) \|\| ($seeid)) {
$sender=&Apache::loncommon::aboutmewrapper(	$sender=&Apache::loncommon::aboutmewrapper(
$contrib{$idx.':plainname'},	$plainname,
$contrib{$idx.':sendername'},	$contrib{$idx.':sendername'},
$contrib{$idx.':senderdomain'}).' ('.	$contrib{$idx.':senderdomain'}).' ('.
$contrib{$idx.':sendername'}.' at '.	$contrib{$idx.':sendername'}.' at '.
$contrib{$idx.':senderdomain'}.')';	$contrib{$idx.':senderdomain'}.')';
if ($contrib{$idx.':anonymous'}) {	if ($contrib{$idx.':anonymous'}) {
$sender.=' [anonymous] '.	$sender.=' [anonymous] '.
$contrib{$idx.':screenname'};	$screenname;
}	}
if ($seeid) {	if ($seeid) {
if ($hidden) {	if ($hidden) {
Line 208 sub xmlend {	Line 215 sub xmlend {
}	}
}	}
} else {	} else {
if ($contrib{$idx.':screenname'}) {	if ($screenname) {
$sender='<i>'.$contrib{$idx.':screenname'}.'</i>';	$sender='<i>'.$screenname.'</i>';
}	}
}	}
$discussion.='<p><b>'.$sender.'</b> ('.	$discussion.='<p><b>'.$sender.'</b> ('.

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.195
changed lines
	Added in v.1.196