[LON-CAPA-cvs] cvs: loncom(GCI_2) /interface loncreateuser.pm
gci
gci@source.lon-capa.org
Wed, 23 Sep 2009 03:49:14 -0000
gci Wed Sep 23 03:49:14 2009 EDT
Modified files: (Branch: GCI_2)
/loncom/interface loncreateuser.pm
Log:
- 'unofficial' is the only type of course available for request in GCI.
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.295.8.1 loncom/interface/loncreateuser.pm:1.295.8.2
--- loncom/interface/loncreateuser.pm:1.295.8.1 Wed Sep 23 03:47:53 2009
+++ loncom/interface/loncreateuser.pm Wed Sep 23 03:49:13 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Create a user
#
-# $Id: loncreateuser.pm,v 1.295.8.1 2009/09/23 03:47:53 gci Exp $
+# $Id: loncreateuser.pm,v 1.295.8.2 2009/09/23 03:49:13 gci Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -234,7 +234,7 @@
if ($context eq 'requestcourses') {
%userenv = &Apache::lonnet::userenvironment($ccdomain,$ccuname,
'requestcourses.official','requestcourses.unofficial');
- @usertools = ('official','unofficial');
+ @usertools = ('unofficial');
@options =('norequest','approval','autolimit','validate');
%validations = &Apache::lonnet::auto_courserequest_checks($ccdomain);
%reqtitles = &courserequest_titles();
@@ -376,7 +376,7 @@
%userenv = &Apache::lonnet::userenvironment($ccdomain,$ccuname,
'reqcrsotherdom.official','reqcrsotherdom.unofficial',
'reqcrsotherdom.community');
- @usertools = ('official','unofficial','community');
+ @usertools = ('unofficial');
@options = ('approval','validate','autolimit');
%validations = &Apache::lonnet::auto_courserequest_checks($cdom);
my $optregex = join('|',@options);