loncom/interface/lonfeedback.pm - diff

Return to lonfeedback.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.160, 2005/04/11 12:20:22	version 1.161, 2005/04/11 15:29:38
Line 2868 sub has_discussion {	Line 2868 sub has_discussion {
if ($resource->hasDiscussion()) {	if ($resource->hasDiscussion()) {
my $ressymb = $resource->symb();	my $ressymb = $resource->symb();
if ($ressymb =~ m-___adm/\w+/\w+/\d+/bulletinboard$-) {	if ($ressymb =~ m-___adm/\w+/\w+/\d+/bulletinboard$-) {
$ressymb = $resource->ressymb();	$ressymb = $resource->wrap_symb();
}	}
push @{$resourcesref}, $ressymb;	push @{$resourcesref}, $ressymb;
}	}