version 1.53, 2010/06/20 01:39:08
|
version 1.54.2.1, 2010/07/30 23:51:41
|
Line 647 sub onload_action {
|
Line 647 sub onload_action {
|
sub print_main_menu { |
sub print_main_menu { |
my ($r,$can_request,$states,$dom,$jscript,$loaditems,$crumb,$request_domains) = @_; |
my ($r,$can_request,$states,$dom,$jscript,$loaditems,$crumb,$request_domains) = @_; |
my ($types,$typename) = &Apache::loncommon::course_types(); |
my ($types,$typename) = &Apache::loncommon::course_types(); |
my $onchange = 'this.form.submit()'; |
my $onchange; |
|
unless ($env{'form.interface'} eq 'textual') { |
|
$onchange = 'this.form.submit()'; |
|
} |
|
|
my $nextstate_setter = "\n"; |
my $nextstate_setter = "\n"; |
if (ref($states) eq 'HASH') { |
if (ref($states) eq 'HASH') { |
foreach my $key (keys(%{$states})) { |
foreach my $key (keys(%{$states})) { |
Line 856 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') && |