version 1.8.4.1, 2009/12/07 18:37:11
|
version 1.8.4.2, 2009/12/07 18:47:31
|
Line 113 sub gcitest_switcher {
|
Line 113 sub gcitest_switcher {
|
my $clean_title = $courses{$course}{'description'}; |
my $clean_title = $courses{$course}{'description'}; |
$clean_title =~ s/\W+//g; |
$clean_title =~ s/\W+//g; |
if ($clean_title eq '') { |
if ($clean_title eq '') { |
$clean_title = $courseinfo{$course}{'description'}; |
$clean_title = $courses{$course}{'description'}; |
} |
} |
push(@{$Sortby{$clean_title}},$course); |
push(@{$Sortby{$clean_title}},$course); |
} |
} |