--- loncom/interface/lonannounce.pm	2005/11/22 16:16:53	1.38
+++ loncom/interface/lonannounce.pm	2006/01/12 22:45:19	1.39
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Announce
 #
-# $Id: lonannounce.pm,v 1.38 2005/11/22 16:16:53 albertel Exp $
+# $Id: lonannounce.pm,v 1.39 2006/01/12 22:45:19 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -244,7 +244,7 @@ sub showday {
     }
     foreach (keys %allcal) {
 	my ($course,$startdate,$enddate)=($_=~/^(\w+)\@(\d+)\_(\d+)$/);
-        if (($startdate<$nextday) && ($enddate>$tk))  {
+        if (($startdate<$nextday) && ($enddate>=$tk))  {
 	    $outp.='___&&&___'.$course.'@'.$startdate.'@'.$enddate.'@'.
             $allcal{$_};
         }