version 1.69, 2003/05/13 14:25:37
|
version 1.70, 2003/05/13 14:30:26
|
Line 231 sub PrepareClasslist {
|
Line 231 sub PrepareClasslist {
|
} |
} |
# |
# |
# Deal with instructors with restricted section access |
# Deal with instructors with restricted section access |
if ($ENV{'request.course.sec'} ne '') { |
if ($ENV{'request.course.sec'} !~ /^\s*$/) { |
@SelectedSections = ($ENV{'request.course.sec'}); |
@SelectedSections = ($ENV{'request.course.sec'}); |
} |
} |
# |
# |
Line 286 sub PrepareClasslist {
|
Line 286 sub PrepareClasslist {
|
} |
} |
# |
# |
# Put the consolidated section data in the right place |
# Put the consolidated section data in the right place |
if ($ENV{'request.course.sec'} ne '') { |
if ($ENV{'request.course.sec'} !~ /^\s*$/) { |
@Sections = ($ENV{'request.course.sec'}); |
@Sections = ($ENV{'request.course.sec'}); |
} else { |
} else { |
@Sections = sort {$a cmp $b} keys(%Sections); |
@Sections = sort {$a cmp $b} keys(%Sections); |