version 1.46, 2010/03/08 13:42:18
|
version 1.47, 2010/03/16 22:40:12
|
Line 1364 sub print_request_form {
|
Line 1364 sub print_request_form {
|
if ($env{'form.origcnum'} =~ /^($match_courseid)$/) { |
if ($env{'form.origcnum'} =~ /^($match_courseid)$/) { |
$cnum = $env{'form.origcnum'}; |
$cnum = $env{'form.origcnum'}; |
} else { |
} else { |
$cnum = &Apache::lonnet::generate_coursenum($dom); |
my $gentype = 'Course'; |
|
if ($crstype eq 'community') { |
|
$gentype = 'Community'; |
|
} |
|
$cnum = &Apache::lonnet::generate_coursenum($dom,$gentype); |
} |
} |
&Apache::lonnet::auto_possible_instcodes($dom,\@codetitles,\%cat_titles, |
&Apache::lonnet::auto_possible_instcodes($dom,\@codetitles,\%cat_titles, |
\%cat_order,\@code_order); |
\%cat_order,\@code_order); |