[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;
 }