--- loncom/interface/lontemplate.pm 2009/02/13 18:56:13 1.16
+++ loncom/interface/lontemplate.pm 2009/02/20 15:09:28 1.18
@@ -1,7 +1,7 @@
# The LearningOnline Network
# "Template" Functions to generate html output
#
-# $Id: lontemplate.pm,v 1.16 2009/02/13 18:56:13 neumanie Exp $
+# $Id: lontemplate.pm,v 1.18 2009/02/20 15:09:28 amueller Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -113,10 +113,12 @@ sub end_ContentBox{
sub send_message{
my ($r,$cnum,$cdom) = @_;
+ my $s;
my $image = qq{};
- $r->print('
');
- $r->print(&Apache::loncommon::messagewrapper($image,$cnum,$cdom).' '.&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom));
- $r->print('
');
+ #$r->print('
');
+ $s=&Apache::loncommon::messagewrapper($image,$cnum,$cdom).' '.&Apache::loncommon::messagewrapper(&mt('Send me a message'),$cnum,$cdom);
+ #$r->print('
');
+ return $s;
}
sub print_template
@@ -124,7 +126,8 @@ sub print_template
my ($r,$topic,$content, $allowed,$boxclass) = @_;
$r->print('