'.&Apache::loncommon::plainname($ENV{'form.recuname'},
@@ -994,16 +1007,31 @@ ENDTREC
ENDRHEAD
$r->print(<New Record (record is visible to course faculty and staff)
+$lt{'newr'}
-
+
ENDBFORM
}
}
+# ================================================================== The Header
+
+sub header {
+ my ($r,$baseurl)=@_;
+ $r->print('Communication and Messages');
+ if ($baseurl) {
+ $r->print("");
+ }
+ $r->print(&Apache::loncommon::studentbrowser_javascript().''.
+ &Apache::loncommon::bodytag('Communication and Messages'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs
+ (undef,'Communication and Messages'));
+
+}
+
# ===================================================================== Handler
sub handler {
@@ -1024,14 +1052,17 @@ sub handler {
$sqs='&sortedby='.$ENV{'form.sortedby'};
# ------------------------------------------------------ They checked for email
&Apache::lonnet::put('email_status',{'recnewemail'=>0});
+
+# ----------------------------------------------------------------- Breadcrumbs
+
+ &Apache::lonhtmlcommon::clear_breadcrumbs();
+ &Apache::lonhtmlcommon::add_breadcrumb
+ ({href=>"/adm/communicate",
+ text=>"Communication/Messages",
+ faq=>12,bug=>'Communication Tools',});
+
# --------------------------------------------------------------- Render Output
- if (!$ENV{'form.display'}) {
- $r->print('EMail and Messaging'.
- &Apache::loncommon::studentbrowser_javascript().''.
- &Apache::loncommon::bodytag('EMail and Messages').
- &Apache::loncommon::help_open_faq(12).
- &Apache::loncommon::help_open_bug('Communication Tools'));
- }
+
if ($ENV{'form.display'}) {
my $msgid=$ENV{'form.display'};
&statuschange($msgid,'read');
@@ -1052,9 +1083,6 @@ sub handler {
my $number_of_messages = scalar(@messages); #subtract 1 for last index
# start output
$r->print('EMail and Messaging');
- if (defined($content{'baseurl'})) {
- $r->print("");
- }
$r->print(&Apache::loncommon::studentbrowser_javascript().
''.
&Apache::loncommon::bodytag('EMail and Messages').