');
+
}
sub end_ContentBox{
@@ -105,20 +113,17 @@ sub end_ContentBox{
sub send_message{
my ($r,$cnum,$cdom) = @_;
+ my $image = qq{};
$r->print('
');
- $r->print(&Apache::loncommon::messagewrapper(qq{print(&Apache::loncommon::messagewrapper($image,$cnum,$cdom).' '.&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom));
$r->print('
');
}
sub print_template
{
- my ($r,$topic,$content, $allowed) = @_;
- if($allowed){
- $r->print('
');
- }else{
- $r->print('
');
- }
- $r->print('
'.$topic.'
');
+ my ($r,$topic,$content, $allowed,$boxclass) = @_;
+ $r->print('
');
+ $r->print('
'.$topic.'
');
$r->print('
'.$content.'
');
$r->print('
');
}
@@ -128,7 +133,7 @@ sub print_editbox_template
my ($r,$content,$field) = @_;
$r->print('');
}