[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",