version 1.8, 2006/07/20 15:51:10
|
version 1.9, 2006/08/19 01:18:25
|
Line 59 sub handler {
|
Line 59 sub handler {
|
my $gpterm = &Apache::loncommon::group_term(); |
my $gpterm = &Apache::loncommon::group_term(); |
my $ucgpterm = $gpterm; |
my $ucgpterm = $gpterm; |
$ucgpterm =~ s/^(\w)/uc($1)/e; |
$ucgpterm =~ s/^(\w)/uc($1)/e; |
my $bodytitle = &mt('[_1] Discussion Boards',$crstype); |
my $bodytitle = $crstype.' Discussion Boards'; |
my $group = $env{'form.group'}; |
my $group = $env{'form.group'}; |
$group =~ s/\W//g; |
$group =~ s/\W//g; |
my ($description,$earlyout,$refarg); |
my ($description,$earlyout,$refarg); |