--- loncom/interface/lonannounce.pm	2005/04/07 06:56:22	1.34
+++ loncom/interface/lonannounce.pm	2005/11/17 19:54:49	1.35
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Announce
 #
-# $Id: lonannounce.pm,v 1.34 2005/04/07 06:56:22 albertel Exp $
+# $Id: lonannounce.pm,v 1.35 2005/11/17 19:54:49 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -191,7 +191,7 @@ sub plaincell {
             $fullmsg=&HTML::Entities::encode($fullmsg,'<>&"\'');
             $fullmsg=~s/&/\\&/g;
             $output.='<a href="javascript:alert('."'$fullmsg'".')">'.
-	       substr($msg,0,40).'...</a><br />';
+	       substr($msg,0,80).'...</a><br />';
        }
     }
     return $output;