[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm
raeburn
raeburn at source.lon-capa.org
Sun Nov 20 16:24:33 EST 2016
raeburn Sun Nov 20 21:24:33 2016 EDT
Modified files:
/loncom/interface loncommon.pm
Log:
- Fx output written to log file when creating courses using Autocreate.pl, in
case where institutional sections used for enrollment did not pass
classlist access check for course owner
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.1260 loncom/interface/loncommon.pm:1.1261
--- loncom/interface/loncommon.pm:1.1260 Sun Nov 13 14:22:15 2016
+++ loncom/interface/loncommon.pm Sun Nov 20 21:24:29 2016
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.1260 2016/11/13 14:22:15 raeburn Exp $
+# $Id: loncommon.pm,v 1.1261 2016/11/20 21:24:29 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -15508,19 +15508,20 @@
' ('.$lt{'adby'}.')';
if ($context eq 'auto') {
$outcome .= $badclass_msg.$linefeed;
+ } else {
$outcome .= '<div class="LC_warning">'.$badclass_msg.$linefeed.'<ul>'."\n";
- foreach my $item (@badclasses) {
- if ($context eq 'auto') {
- $outcome .= " - $item\n";
- } else {
- $outcome .= "<li>$item</li>\n";
- }
- }
+ }
+ foreach my $item (@badclasses) {
if ($context eq 'auto') {
- $outcome .= $linefeed;
+ $outcome .= " - $item\n";
} else {
- $outcome .= "</ul><br /><br /></div>\n";
+ $outcome .= "<li>$item</li>\n";
}
+ }
+ if ($context eq 'auto') {
+ $outcome .= $linefeed;
+ } else {
+ $outcome .= "</ul><br /><br /></div>\n";
}
}
if ($args->{'no_end_date'}) {
More information about the LON-CAPA-cvs
mailing list