--- loncom/interface/lonparmset.pm	2006/05/15 23:40:54	1.305
+++ loncom/interface/lonparmset.pm	2006/05/16 20:43:57	1.306
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.305 2006/05/15 23:40:54 albertel Exp $
+# $Id: lonparmset.pm,v 1.306 2006/05/16 20:43:57 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -91,11 +91,11 @@ Inputs:  $what - a parameter spec (inclu
 
 Returns:  A list, the first item is the index into the remaining list of items of parm valuse that is the active one, the list consists of parm values at the 14 possible levels
 
-14 - General Course
-13 - Map or Folder level in course
+14- General Course
+13- Map or Folder level in course
 12- resource default
 11- map default
-10 - resource level in course
+10- resource level in course
 9 - General for section
 8 - Map or Folder level for section
 7 - resource level in section
@@ -1512,7 +1512,7 @@ sub assessparms {
             @usersgroups = &Apache::lonnet::get_users_groups(
                                        $udom,$uname,$env{'request.course.id'});
             if (@usersgroups > 0) {
-                unless (grep/^\Q$cgroup\E$/,@usersgroups) {
+                unless (grep(/^\Q$cgroup\E$/,@usersgroups)) {
                     $cgroup = $usersgroups[0];
                 }
             }
@@ -1930,7 +1930,7 @@ ENDMAPONE
             }
             
             if ($csec) {$r->print(&mt("Section")."<font color=\"red\"> <i>$csec</i></font>\n")};
-            if ($cgroup) {$r->print(&mt("Group")."<font color=\"red\"> <i>$csec</i></font>\n")};
+            if ($cgroup) {$r->print(&mt("Group")."<font color=\"red\"> <i>$cgroup</i></font>\n")};
             $r->print("</h4>\n");
 #---------------------------------------------------------------- print table
             $r->print('<p><table border="2">');