loncom/interface/lonmsgdisplay.pm - diff

Return to lonmsgdisplay.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.91, 2008/08/25 14:29:12	version 1.92, 2008/08/27 08:57:15
Line 2096 sub displaymessage {	Line 2096 sub displaymessage {
my %message=&Apache::lonnet::get('nohist_email'.$suffix,[$msgid]);	my %message=&Apache::lonnet::get('nohist_email'.$suffix,[$msgid]);
my %content=&Apache::lonmsg::unpackagemsg($message{$msgid});	my %content=&Apache::lonmsg::unpackagemsg($message{$msgid});
my $counter=0;	my $counter=0;
$r->print('<pre>');
my $escmsgid=&escape($msgid);	my $escmsgid=&escape($msgid);
foreach (@messages) {	foreach (@messages) {
if ($_->[5] eq $escmsgid){	if ($_->[5] eq $escmsgid){
Line 2104 sub displaymessage {	Line 2103 sub displaymessage {
}	}
$counter++;	$counter++;
}	}
$r->print('</pre>');

my $see_anonymous;	my $see_anonymous;
my $from_student = 0;	my $from_student = 0;
Line 2356 sub displaymessage {	Line 2354 sub displaymessage {
.&displayresource(%content)	.&displayresource(%content)
);	);
}	}
$r->print(&Apache::lonhtmlcommon::row_closure(1));	$r->print(&Apache::lonhtmlcommon::row_closure(1).
	&Apache::lonhtmlcommon::end_pick_box());
# Display LON-CAPA Message (End)	# Display LON-CAPA Message (End)
return;	return;
}	}