version 1.91, 2008/08/25 14:29:12
|
version 1.93, 2008/10/08 14:56:50
|
Line 1256 sub compout {
|
Line 1256 sub compout {
|
'atta' => 'Attachment', |
'atta' => 'Attachment', |
); |
); |
my %attachmax = ( |
my %attachmax = ( |
text => '(128 KB max size)', |
text => &mt('(128 KB max size)'), |
num => 131072, |
num => 131072, |
); |
); |
if (!$forwarding && !$multiforward) { |
if (!$forwarding && !$multiforward) { |
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; |
} |
} |