[LON-CAPA-cvs] cvs: loncom /interface lonmsgdisplay.pm
raeburn
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 27 Aug 2008 08:57:18 -0000
raeburn Wed Aug 27 04:57:18 2008 EDT
Modified files:
/loncom/interface lonmsgdisplay.pm
Log:
- Eliminate unneeded <pre></pre> which occurs before the first legimate tag (i.e., <html>).
- Missing &end_pick_box().
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.91 loncom/interface/lonmsgdisplay.pm:1.92
--- loncom/interface/lonmsgdisplay.pm:1.91 Mon Aug 25 10:29:12 2008
+++ loncom/interface/lonmsgdisplay.pm Wed Aug 27 04:57:15 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging display
#
-# $Id: lonmsgdisplay.pm,v 1.91 2008/08/25 14:29:12 bisitz Exp $
+# $Id: lonmsgdisplay.pm,v 1.92 2008/08/27 08:57:15 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2096,7 +2096,6 @@
my %message=&Apache::lonnet::get('nohist_email'.$suffix,[$msgid]);
my %content=&Apache::lonmsg::unpackagemsg($message{$msgid});
my $counter=0;
- $r->print('<pre>');
my $escmsgid=&escape($msgid);
foreach (@messages) {
if ($_->[5] eq $escmsgid){
@@ -2104,7 +2103,6 @@
}
$counter++;
}
- $r->print('</pre>');
my $see_anonymous;
my $from_student = 0;
@@ -2356,7 +2354,8 @@
.&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)
return;
}