--- loncom/interface/loncommunicate.pm	2002/08/21 17:18:08	1.11
+++ loncom/interface/loncommunicate.pm	2002/12/27 16:33:36	1.14
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Communicate
 #
-# $Id: loncommunicate.pm,v 1.11 2002/08/21 17:18:08 www Exp $
+# $Id: loncommunicate.pm,v 1.14 2002/12/27 16:33:36 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -77,8 +77,12 @@ END
   <b><a href="/adm/email?compose=group">Broadcast message to course</a></b>
 </td></tr>
 <tr><td bgcolor="#FFFFAA">
-  <b><a href="/adm/email?compose=upload">Upload messages to course</a></b>
+  <b><a href="/adm/email?compose=upload">Distribute messages from uploaded file to course</a></b>
 </td></tr>
+<tr><td bgcolor="#FFFFAA">
+  <b><a href="/adm/email?recordftf=query">User records of face-to-face discussions and critical messages</a></b>
+</td></tr>
+
 END
     }
     $r->print('</table>');
@@ -90,7 +94,7 @@ END
     foreach (@msgids) {
         my ($sendtime,$shortsubj,$fromname,$fromdom,$status)=
 	    &Apache::lonmsg::unpackmsgid($_);
-       if ($sendtime!~/error/) {
+       if (defined($sendtime) && $sendtime!~/error/) {
         $sendtime = localtime($sendtime);
         if ($status eq 'new') {
             push @newmsgs, {