--- loncom/interface/lonmsg.pm	2004/03/26 17:13:59	1.94
+++ loncom/interface/lonmsg.pm	2004/03/26 19:35:59	1.95
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging
 #
-# $Id: lonmsg.pm,v 1.94 2004/03/26 17:13:59 www Exp $
+# $Id: lonmsg.pm,v 1.95 2004/03/26 19:35:59 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -101,6 +101,7 @@ use Apache::lontexconvert();
 use HTML::Entities();
 use Mail::Send;
 use Apache::lonlocal;
+use Apache::loncommunicate;
 
 # Querystring component with sorting type
 my $sqs;
@@ -1249,13 +1250,15 @@ sub handler {
 		$r->print($thismsg.'<br />');
 		$sendstatus.=' '.$thismsg;
 	    }
+	} else {
+	    &printheader($r,'','No messages sent.'); 
 	}
 	if ($sendstatus=~/^(\s*(?:ok|con_delayed)\s*)*$/) {
 	    $r->print('<br /><font color="green">'.&mt('Completed.').'</font>');
 	    if ($ENV{'form.displayedcrit'}) {
 		&discrit($r);
 	    } else {
-		&disall($r);
+		&Apache::loncommunicate::menu($r);
 	    }
 	} else {
 	    $r->print(