--- loncom/interface/loncommunicate.pm 2003/10/04 20:49:40 1.17 +++ loncom/interface/loncommunicate.pm 2004/01/14 22:08:23 1.18 @@ -1,7 +1,7 @@ # The LearningOnline Network # Communicate # -# $Id: loncommunicate.pm,v 1.17 2003/10/04 20:49:40 www Exp $ +# $Id: loncommunicate.pm,v 1.18 2004/01/14 22:08:23 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -73,6 +73,11 @@ END 'op' => 'Open', 'do' => 'Domain' ); + my %help=(); + foreach ('Course_Face_To_Face_Records,Course_Critical_Message', + 'Course_Broadcast_Message') { + $help{$_}=&Apache::loncommon::help_open_topic($_); + } $r->print(&Apache::loncommon::bodytag("Communication and Messages")); $r->print(<print(< - $lt{'bmc'} + $lt{'bmc'}$help{'Course_Broadcast_Message'} $lt{'dmu'} - $lt{'unr'} +$lt{'unr'}$help{'Course_Face_To_Face_Records,Course_Critical_Message'} END