--- loncom/interface/groupboards.pm 2009/01/28 14:09:54 1.12 +++ loncom/interface/groupboards.pm 2012/07/21 21:20:06 1.15 @@ -1,6 +1,8 @@ # The LearningOnline Network # Group Bulletin Boards Manager # +# $Id: groupboards.pm,v 1.15 2012/07/21 21:20:06 raeburn Exp $ +# # Copyright Michigan State University Board of Trustees # # This file is part of the LearningOnline Network with CAPA (LON-CAPA). @@ -59,7 +61,7 @@ sub handler { my $gpterm = &Apache::loncommon::group_term(); my $ucgpterm = $gpterm; $ucgpterm =~ s/^(\w)/uc($1)/e; - my $bodytitle = $crstype.' Discussion Boards'; + my $bodytitle = $ucgpterm.' Discussion Boards'; my $group = $env{'form.group'}; $group =~ s/\W//g; my ($description,$earlyout,$refarg); @@ -249,7 +251,7 @@ sub create_board { $LONCAPA::map::resources[$newidx]=$bbtitle.':'.$newurl. ':false:normal:res'; push(@LONCAPA::map::order,$newidx); - my ($errtext,$fatal)=&LONCAPA::map::storemap($allbbsmap,1); + my ($errtext,$fatal)=&LONCAPA::map::storemap($allbbsmap,1,1); if ($fatal) { $outcome = "error: failed to save discussion boards map - $errtext\n"; } else {