[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface lonmsgdisplay.pm
raeburn
raeburn@source.lon-capa.org
Sat, 20 Nov 2010 13:19:49 -0000
raeburn Sat Nov 20 13:19:49 2010 EDT
Modified files: (Branch: version_2_9_X)
/loncom/interface lonmsgdisplay.pm
Log:
- Typo in 1.124.4.1
- Backport 1.155.
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.124.4.11 loncom/interface/lonmsgdisplay.pm:1.124.4.12
--- loncom/interface/lonmsgdisplay.pm:1.124.4.11 Fri Aug 20 19:12:22 2010
+++ loncom/interface/lonmsgdisplay.pm Sat Nov 20 13:19:49 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging display
#
-# $Id: lonmsgdisplay.pm,v 1.124.4.11 2010/08/20 19:12:22 raeburn Exp $
+# $Id: lonmsgdisplay.pm,v 1.124.4.12 2010/11/20 13:19:49 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -698,7 +698,7 @@
sub group_check_uncheck {
my $output = qq|
<script type="text/javascript">
-/ <![CDATA[
+// <![CDATA[
function toggleAll(form,action) {
if (typeof(form.selectedusers_forminput.length)=="undefined") {
if (action == 'check') {
@@ -2621,12 +2621,14 @@
}
if ($content{'group'} ne '') {
if (&check_group_priv($content{'group'})) {
- $groupcclist = join(', ',@{$recipients{'group_cc_broadcast'}});
- if ($groupcclist) {
- $r->print(&Apache::lonhtmlcommon::row_title(&mt('Group Cc'))
- .$groupcclist
- .&Apache::lonhtmlcommon::row_closure()
- );
+ if (ref($recipients{'group_cc_broadcast'}) eq 'ARRAY') {
+ $groupcclist = join(', ',@{$recipients{'group_cc_broadcast'}});
+ if ($groupcclist) {
+ $r->print(&Apache::lonhtmlcommon::row_title(&mt('Group Cc'))
+ .$groupcclist
+ .&Apache::lonhtmlcommon::row_closure()
+ );
+ }
}
}
}