--- loncom/interface/lonsyllabus.pm 2003/03/03 13:03:58 1.15 +++ loncom/interface/lonsyllabus.pm 2003/03/25 19:18:40 1.17 @@ -1,7 +1,7 @@ # The LearningOnline Network # Syllabus # -# $Id: lonsyllabus.pm,v 1.15 2003/03/03 13:03:58 www Exp $ +# $Id: lonsyllabus.pm,v 1.17 2003/03/25 19:18:40 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -92,6 +92,22 @@ ENDDOCUMENT ("Syllabus",$forcestudent,$addentries,'',$cdom,$ENV{'form.register'})); $r->print('

'.$courseenv{'description'}.'

'. $Apache::lonnet::domaindescription{$cdom}.'

'); + +# -------------------------------------------------------- Get course personnel + my %coursepersonnel=&Apache::lonnet::get_course_adv_roles($cdom.'/'.$cnum); + $r->print(''); + foreach (keys %coursepersonnel) { + $r->print(''); + } + $r->print('
'.$_.''); + foreach (split(/\,/,$coursepersonnel{$_})) { + my ($puname,$pudom)=split(/\:/,$_); + $r->print(' '.&Apache::loncommon::aboutmewrapper( + &Apache::loncommon::plainname($puname, + $pudom),$puname,$pudom)); + } + $r->print('
'); +# ---------------------------------------------------------- Load syllabus info my %syllabus=&Apache::lonnet::dump('syllabus',$cdom,$cnum); my $allowed=0; @@ -105,7 +121,7 @@ ENDDOCUMENT } if ($allowed) { $r->print('

'. -&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'

This syllabus can be publically viewed at http://'. +&Apache::loncommon::help_open_topic('Uploaded_Templates_TextBoxes','Help with filling in text boxes').'

This syllabus can be publicly viewed at http://'. $Apache::lonnet::hostname{$homeserver}.$r->uri.''. &Apache::loncommon::help_open_topic('Syllabus_ExtLink').'

'. '

Show Student View'.