|
version 1.49, 2010/03/30 15:01:17
|
version 1.54.2.1, 2010/07/30 23:51:41
|
|
Line 700 END
|
Line 700 END
|
| official => 'You are not permitted to request creation of an official course in this domain.', |
official => 'You are not permitted to request creation of an official course in this domain.', |
| unofficial => 'You are not permitted to request creation of an unofficial course in this domain.', |
unofficial => 'You are not permitted to request creation of an unofficial course in this domain.', |
| community => 'You are not permitted to request creation of a community this domain.', |
community => 'You are not permitted to request creation of a community this domain.', |
| all => 'You must choose a specific course type when making a new course request.\\nAll types is not allowed.', |
all => 'You must choose a specific course type when making a new course request.\\n\"All types\" is not allowed.', |
| ); |
); |
| $js .= <<END; |
$js .= <<END; |
| if (crschoice == 'official') { |
if (crschoice == 'official') { |
|
Line 860 END
|
Line 860 END
|
| } |
} |
| if ($action eq 'new') { |
if ($action eq 'new') { |
| my $jsextra; |
my $jsextra; |
| if ($state eq 'courseinfo') { |
if (($state eq 'courseinfo') || ($state eq 'codepick')) { |
| $jsextra = "\n".&Apache::loncommon::coursebrowser_javascript($dom); |
$jsextra = "\n".&Apache::loncommon::coursebrowser_javascript($dom); |
| } elsif ($state eq 'enrollment') { |
} elsif ($state eq 'enrollment') { |
| if (($env{'form.crstype'} eq 'official') && |
if (($env{'form.crstype'} eq 'official') && |
|
Line 2314 sub reqstatus_names {
|
Line 2314 sub reqstatus_names {
|
| my @statuses = qw(created approval pending rejected cancelled); |
my @statuses = qw(created approval pending rejected cancelled); |
| my %statusnames = |
my %statusnames = |
| &Apache::lonlocal::texthash ( |
&Apache::lonlocal::texthash ( |
| created => 'Course/Community created', |
created => 'Created', |
| approval => 'Queued pending approval', |
approval => 'Queued pending approval', |
| pending => 'Queued pending validation', |
pending => 'Queued pending validation', |
| rejected => 'Request rejected', |
rejected => 'Request rejected', |
|
Line 2787 sub clone_form {
|
Line 2787 sub clone_form {
|
| if ($crstype eq 'community') { |
if ($crstype eq 'community') { |
| $type = 'Community'; |
$type = 'Community'; |
| } |
} |
| my $cloneform = &Apache::loncommon::select_dom_form($dom,'clonedom').' '. |
|
| &Apache::loncommon::selectcourse_link($formname,'clonecrs','clonedom','','','',$type); |
|
| my %lt = &clone_text(); |
my %lt = &clone_text(); |
| my $output .= |
my $output .= |
| &Apache::lonhtmlcommon::row_title($lt{'cid'}).'<label>'. |
|
| '<input type="text" size="25" name="clonecrs" value="" />'. |
|
| '</label>'.&Apache::lonhtmlcommon::row_closure(1). |
|
| &Apache::lonhtmlcommon::row_title($lt{'dmn'}).'<label>'. |
&Apache::lonhtmlcommon::row_title($lt{'dmn'}).'<label>'. |
| $cloneform.'</label>'.&Apache::lonhtmlcommon::row_closure(1). |
&Apache::loncommon::select_dom_form($dom,'clonedom').'</label>'. |
| |
&Apache::lonhtmlcommon::row_closure(1). |
| |
&Apache::lonhtmlcommon::row_title($lt{'cid'}).'<label>'. |
| |
'<input type="text" size="25" name="clonecrs" value="" onfocus="this.blur();opencrsbrowser('."'$formname','clonecrs','clonedom','','','','','$type'".')" />'. |
| |
'</label> '. |
| |
&Apache::loncommon::selectcourse_link($formname,'clonecrs','clonedom','','','',$type). |
| |
&Apache::lonhtmlcommon::row_closure(1). |
| &Apache::lonhtmlcommon::row_title($lt{'dsh'}).'<label>'. |
&Apache::lonhtmlcommon::row_title($lt{'dsh'}).'<label>'. |
| '<input type="radio" name="datemode" value="delete" /> '.$lt{'ncd'}. |
'<input type="radio" name="datemode" value="delete" /> '.$lt{'ncd'}. |
| '</label><br /><label>'. |
'</label><br /><label>'. |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonrequestcourse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface