version 1.151, 2006/08/08 19:02:04
|
version 1.152, 2006/08/08 19:10:54
|
Line 700 sub StatusOptions {
|
Line 700 sub StatusOptions {
|
$Str .= ' size="'.$size.'" '; |
$Str .= ' size="'.$size.'" '; |
$Str .= '>'."\n"; |
$Str .= '>'."\n"; |
foreach my $type (['Active', &mt('Currently Enrolled')], |
foreach my $type (['Active', &mt('Currently Enrolled')], |
['Future', &mt('Future Enrolled')], |
['Future', &mt('Future Enrollment')], |
['Expired', &mt('Previously Enrolled')], |
['Expired', &mt('Previously Enrolled')], |
['Any', &mt('Any Enrollment Status')]) { |
['Any', &mt('Any Enrollment Status')]) { |
my ($name,$label) = @$type; |
my ($name,$label) = @$type; |