version 1.925.2.21, 2010/12/05 16:38:37
|
version 1.925.2.22, 2010/12/05 17:40:24
|
Line 11041 sub needs_gci_custom {
|
Line 11041 sub needs_gci_custom {
|
return $custommenu; |
return $custommenu; |
} |
} |
|
|
|
sub ci_tabs { |
|
my ($domain) = @_; |
|
my %tabs = ( |
|
gci => ['review','submit','managetest','tutorial'], |
|
slci => ['review'], |
|
return $tabs{$domain}; |
|
} |
|
|
sub check_for_gci_dc { |
sub check_for_gci_dc { |
my $then=$env{'user.login.time'}; |
my $then=$env{'user.login.time'}; |
my $numdc = 0; |
my $numdc = 0; |
Line 11068 sub get_faculty_cnums {
|
Line 11076 sub get_faculty_cnums {
|
}, |
}, |
slci => { |
slci => { |
review => '', |
review => '', |
submit => '', |
|
tutorial' => '', |
|
} |
} |
); |
); |
return %cnums; |
return %cnums; |