');
}
-sub send_message{
+sub send_message {
my ($r,$cnum,$cdom) = @_;
my $s;
- my $image = qq{};
+ my $image = qq{};
$s=&Apache::loncommon::messagewrapper($image,$cnum,$cdom).' '.&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom);
return $s;
}
@@ -121,20 +120,25 @@ sub print_template
my ($r,$topic,$content, $allowed,$boxclass) = @_;
$r->print('
');
$r->print('
'.$topic.'
');
- $r->print('
' .$content . '
');
+ $r->print('
' .$content . '
');
$r->print('
');
}
+
sub print_start_template
{
my ($r,$topic,$boxclass) = @_;
$r->print('
');
$r->print('
'.$topic.'
');
+ $r->print('
' );
}
+
sub print_end_template
{
my ($r) = @_;
$r->print('
');
+ $r->print('
');
}
+
sub print_editbox_template
{
my ($r,$content,$field) = @_;
@@ -147,19 +151,20 @@ sub print_editbox_template
# Functionslist: List of functions
# Typically used to display a list of available functions at top of page
sub start_functionslist {
- my($r)=@_;
- $r->print('';
}
1;