--- loncom/interface/lonpickcourse.pm 2009/07/31 03:01:31 1.85
+++ loncom/interface/lonpickcourse.pm 2009/10/30 04:44:56 1.87
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Pick a course
#
-# $Id: lonpickcourse.pm,v 1.85 2009/07/31 03:01:31 raeburn Exp $
+# $Id: lonpickcourse.pm,v 1.87 2009/10/30 04:44:56 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -102,7 +102,10 @@ sub handler {
if ((($env{'form.form'} eq 'cu') || ($env{'form.form'} eq 'studentform')) &&
($env{'form.pickedcourse'})) {
- $loaditem{'onload'} .= 'setSections()';
+ if ($env{'form.form'} eq 'cu') {
+ $loaditem{'onload'} .= 'setRoles();';
+ }
+ $loaditem{'onload'} .= 'setSections();';
}
my $js = &js_changer();
$r->print(&Apache::loncommon::start_page($title,$js,
@@ -252,7 +255,12 @@ sub create_user_javascript {
my $output;
#javascript for reporting sections and groups then closing
if ($env{'form.pickedcourse'}) {
- my ($cdom,$cnum) = split/_/,$env{'form.pickedcourse'};
+ my %coursedescription =
+ &Apache::lonnet::coursedescription($env{'form.pickedcourse'},
+ {'one_time' => '1'});
+ my $cdom = $coursedescription{'domain'};
+ my $cnum = $coursedescription{'num'};
+ my $crstype = $coursedescription{'type'};
my $sec_element = 'currsec';
my $grplist_element = 'groups';
my ($sections,$groups) =
@@ -266,7 +274,10 @@ sub create_user_javascript {
function setSections() {
opener.document.$env{"form.form"}.$grplist_element.value='$groupslist';
window.opener.setSect('$seclist');
- self.close()
+ self.close();
+}
+function setRoles() {
+ window.opener.setRole('$crstype');
}
|;
@@ -593,7 +604,7 @@ sub build_filters {
$cloneableon = $cloneableoff;
$cloneableoff = '';
}
- $cloneableonlyform = ''.(' 'x3).'';
+ $cloneableonlyform = ''.(' 'x3).'';
if ($env{'form.form'} eq 'ccrs') {
$cloneabletitle = &mt('Cloneable for').' '.$cloneruname.':'.$clonerudom;
} else {