--- loncom/interface/lonbulletin.pm 2012/11/08 22:01:00 1.64 +++ loncom/interface/lonbulletin.pm 2012/11/17 00:05:50 1.65 @@ -1,7 +1,7 @@ # The LearningOnline Network # Bulletin Board Handler # -# $Id: lonbulletin.pm,v 1.64 2012/11/08 22:01:00 raeburn Exp $ +# $Id: lonbulletin.pm,v 1.65 2012/11/17 00:05:50 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -131,7 +131,11 @@ sub handler { } else { $course_or_group="Group"; } + my $registered; if ($group ne '' && $env{'form.group'} eq $group) { + unless ($env{'form.ref'} eq 'grouplist') { + $registered = $env{'form.register'}; + } my $gpterm = &Apache::loncommon::group_term(); my $ucgpterm = $gpterm; $ucgpterm =~ s/^(\w)/uc($1)/e; @@ -141,11 +145,17 @@ sub handler { if ((ref($groupboards) eq 'ARRAY') && (@{$groupboards} > 0)) { $boardtitle = $$boards{$$groupboards[0]}{'title'}; } - $boardurl .= '?register=1&group='.$group; - $brcrum = - &groupboard_breadcrumbs($dom,$crs,$group,$refarg,$gpterm, - $ucgpterm,$grp_desc,$boardurl,$boardtitle); + $boardurl .= '?group='.$group; + if ($registered) { + $boardurl .= '&register='.$env{'form.register'}; + } else { + $brcrum = + &groupboard_breadcrumbs($dom,$crs,$group,$refarg,$gpterm, + $ucgpterm,$grp_desc,$boardurl, + $boardtitle); + } } else { + $registered = $env{'form.register'}; $brcrum = []; } my $start_page = @@ -154,8 +164,8 @@ sub handler { 'domain' => $dom, 'bread_crumbs' => $brcrum, 'group' => $group, - 'force_register' => - $env{'form.register'}}); + 'force_register' => $registered} + ); $r->print($start_page); } my ($allowed);