[LON-CAPA-cvs] cvs: loncom /interface lonmsgdisplay.pm

albertel lon-capa-cvs@mail.lon-capa.org
Tue, 29 Aug 2006 00:12:07 -0000


albertel		Mon Aug 28 20:12:07 2006 EDT

  Modified files:              
    /loncom/interface	lonmsgdisplay.pm 
  Log:
  - broadcast messages need to have this input in order for things to work correctly
  
  
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.39 loncom/interface/lonmsgdisplay.pm:1.40
--- loncom/interface/lonmsgdisplay.pm:1.39	Wed Jul 19 09:09:32 2006
+++ loncom/interface/lonmsgdisplay.pm	Mon Aug 28 20:12:02 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging display
 #
-# $Id: lonmsgdisplay.pm,v 1.39 2006/07/19 13:09:32 raeburn Exp $
+# $Id: lonmsgdisplay.pm,v 1.40 2006/08/29 00:12:02 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -270,12 +270,14 @@
 	    &Apache::lonselstudent::get_people_in_class($env{'request.course.sec'});
     unshift @$current_members, (@$course_personnel);
     my %defaultUsers;
+    
+    $result .= '<input type="hidden" name="sendmode" value="group" />'."\n";
 
-    $result = &Apache::lonselstudent::render_student_list($current_members,
-							  "compemail",
-							  "current",
-							  \%defaultUsers,
-							  1,"selectedusers",1);
+    $result .= &Apache::lonselstudent::render_student_list($current_members,
+							   "compemail",
+							   "current",
+							   \%defaultUsers,
+							   1,"selectedusers",1);
 
     $result .= &Apache::lonselstudent::render_student_list($expired_members,
 							   "compemail",