--- loncom/interface/lonpickcourse.pm	2006/04/10 21:40:09	1.42
+++ loncom/interface/lonpickcourse.pm	2006/05/08 21:40:20	1.43
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Pick a course
 #
-# $Id: lonpickcourse.pm,v 1.42 2006/04/10 21:40:09 albertel Exp $
+# $Id: lonpickcourse.pm,v 1.43 2006/05/08 21:40:20 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -96,7 +96,7 @@ sub handler {
                       ['-1','86400','604800','2592000','7776000',
 		      '15552000','31104000']));
 # if called from loncreateuser, report sections, then close
-    my (%loaditem,$seclist);
+    my (%loaditem,$seclist,$groupslist);
     my $num_sections = 0;
     if ($env{'form.form'} eq 'cu' && $env{'form.pickedcourse'}) {
         $loaditem{'onload'} ="setSections()";
@@ -108,6 +108,12 @@ sub handler {
             @sections = (sort {$a <=> $b} keys(%sections_count));
             $seclist = join('","',@sections);
         }
+        my (%curr_groups,$numgroups);
+        $numgroups = &Apache::loncommon::coursegroups(\%curr_groups,$cdom,
+                                                         $cnum);
+        if ($numgroups > 0) {
+            $groupslist = join(',',sort(keys(%curr_groups)));
+        }
     }
     my $jscript;
     my $title = 'Selecting a course';
@@ -236,6 +242,7 @@ function setSections() {
             opener.document.$env{"form.form"}.currsec.options[0].selected = false
         }
     }
+    opener.document.$env{"form.form"}.groups.value='$groupslist';
     self.close()
 }