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

raeburn lon-capa-cvs-allow@mail.lon-capa.org
Tue, 15 Jul 2008 20:01:00 -0000


raeburn		Tue Jul 15 16:01:00 2008 EDT

  Modified files:              
    /loncom/interface	lonparmset.pm 
  Log:
  - Suppress display of self-enrollment settings in course (these are set from "Manage Users" menu).
  - Suppress display of course type (ultimately, this is expected to be set by a DC; however it's not used currently).
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.404 loncom/interface/lonparmset.pm:1.405
--- loncom/interface/lonparmset.pm:1.404	Wed Jul  9 07:10:06 2008
+++ loncom/interface/lonparmset.pm	Tue Jul 15 16:00:58 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.404 2008/07/09 11:10:06 bisitz Exp $
+# $Id: lonparmset.pm,v 1.405 2008/07/15 20:00:58 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2399,7 +2399,9 @@
 			     'disableexampointprint',
 			     'task_messages','task_grading'));
 	foreach my $parameter (sort(keys(%values))) {
-            unless (($parameter =~ m/^internal\./)||($parameter =~ m/^metadata\./)) {
+            unless (($parameter =~ m/^internal\./)||($parameter =~ m/^metadata\./) ||
+                    ($parameter =~ m/^selfenroll_/) || ($parameter =~ /_selfenroll$/)
+                    || ($parameter eq 'type')) {
                 if (! $descriptions{$parameter}) {
                     $descriptions{$parameter}=$parameter;
                     push(@Display_Order,$parameter);