version 1.138, 2009/11/04 18:30:17
|
version 1.139, 2009/11/26 05:21:43
|
Line 1845 sub disfacetoface {
|
Line 1845 sub disfacetoface {
|
foreach my $key (sort(keys(%records))) { |
foreach my $key (sort(keys(%records))) { |
my %content=&Apache::lonmsg::unpackagemsg($records{$key}); |
my %content=&Apache::lonmsg::unpackagemsg($records{$key}); |
next if ($content{'senderdomain'} eq ''); |
next if ($content{'senderdomain'} eq ''); |
&Apache::lonfeedback::newline_to_br(\$content{'message'}); |
if (!&Apache::lonfeedback::contains_block_html($content{'message'})) { |
|
&Apache::lonfeedback::newline_to_br(\$content{'message'}); |
|
} |
if ($content{'subject'}=~/^Record/) { |
if ($content{'subject'}=~/^Record/) { |
$result.='<h3>'.&mt('Record').'</h3>'; |
$result.='<h3>'.&mt('Record').'</h3>'; |
} elsif ($content{'subject'}=~/^Broadcast/) { |
} elsif ($content{'subject'}=~/^Broadcast/) { |