loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.242, 2003/03/29 22:50:22	version 1.243, 2003/03/30 21:58:17
Line 196 sub xmlend {	Line 196 sub xmlend {
my $message=$contrib{$idx.':message'};	my $message=$contrib{$idx.':message'};
$message=~s/\n/\<br \/\>/g;	$message=~s/\n/\<br \/\>/g;
$message=&Apache::lontexconvert::msgtexconverted($message);	$message=&Apache::lontexconvert::msgtexconverted($message);
	if ($contrib{$idx.':attachmenturl'}) {
	my ($fname,$ft)
	=($contrib{$idx.':attachmenturl'}=~/\/(\w+)\.(\w+)$/);
	$message.='<p>Attachment: <a href="'.
	&Apache::lonnet::tokenwrapper($contrib{$idx.':attachmenturl'}).
	'"><tt>'.$fname.'.'.$ft.'</tt></a>';
	}
if ($message) {	if ($message) {
if ($hidden) {	if ($hidden) {
$message='<font color="#888888">'.$message.'</font>';	$message='<font color="#888888">'.$message.'</font>';
Line 248 sub xmlend {	Line 255 sub xmlend {
}	}
if ($discussiononly) {	if ($discussiononly) {
$discussion.=(<<ENDDISCUSS);	$discussion.=(<<ENDDISCUSS);
<form action="/adm/feedback" method="post" name="mailform">	<form action="/adm/feedback" method="post" name="mailform" enctype="multipart/form-data">
<input type="submit" name="discuss" value="Post Discussion" />	<input type="submit" name="discuss" value="Post Discussion" />
<input type="submit" name="anondiscuss" value="Post Anonymous Discussion" />	<input type="submit" name="anondiscuss" value="Post Anonymous Discussion" />
<input type="hidden" name="symb" value="$symb" />	<input type="hidden" name="symb" value="$symb" />