--- loncom/interface/lonsyllabus.pm	2003/03/25 19:18:40	1.17
+++ loncom/interface/lonsyllabus.pm	2003/06/20 13:31:46	1.20
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Syllabus
 #
-# $Id: lonsyllabus.pm,v 1.17 2003/03/25 19:18:40 www Exp $
+# $Id: lonsyllabus.pm,v 1.20 2003/06/20 13:31:46 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -34,6 +34,7 @@ use Apache::loncommon;
 use Apache::lonnet;
 use Apache::lontexconvert;
 use Apache::lonfeedback;
+use Apache::lonannounce;
 
 sub handler {
     my $r = shift;
@@ -92,11 +93,13 @@ ENDDOCUMENT
        ("Syllabus",$forcestudent,$addentries,'',$cdom,$ENV{'form.register'}));
     $r->print('<h1>'.$courseenv{'description'}.'</h1><h3>'.
               $Apache::lonnet::domaindescription{$cdom}.'</h3>');
-
+# -------------------------------------------------------------- Announcements?
+    $r->print(&Apache::lonannounce::showday(time,2,
+                         &Apache::lonannounce::readcalendar($cdom.'_'.$cnum)));
 # -------------------------------------------------------- Get course personnel
     my %coursepersonnel=&Apache::lonnet::get_course_adv_roles($cdom.'/'.$cnum);
     $r->print('<table border="2">');
-    foreach (keys %coursepersonnel) {
+    foreach (sort keys %coursepersonnel) {
 	$r->print('<tr><td>'.$_.'</td><td>');
         foreach (split(/\,/,$coursepersonnel{$_})) {
 	    my ($puname,$pudom)=split(/\:/,$_);
@@ -215,7 +218,7 @@ ENDDOCUMENT
               } else {
                  $message=~s/\n/\<br \/\>/g;
                  $message
-             =~s/(http\:\/\/[^\s]+)/\<a href=\"$1\"\>\<tt\>$1\<\/tt\>\<\/a\>/g;
+           =~s/(https*\:\/\/[^\s]+)/\<a href=\"$1\"\>\<tt\>$1\<\/tt\>\<\/a\>/g;
 	         $message=&Apache::lontexconvert::msgtexconverted($message);
                  $r->print('<h3>'.$syllabusfields{$_}.'</h3><blockquote>'.
                         $message.'</blockquote>');