--- loncom/interface/lonsyllabus.pm 2008/07/15 19:50:39 1.65
+++ loncom/interface/lonsyllabus.pm 2008/10/22 08:56:35 1.68
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Syllabus
#
-# $Id: lonsyllabus.pm,v 1.65 2008/07/15 19:50:39 raeburn Exp $
+# $Id: lonsyllabus.pm,v 1.68 2008/10/22 08:56:35 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -179,14 +179,13 @@ ENDSCRIPT
# -------------------------------------------------------- Get course personnel
my %coursepersonnel=&Apache::lonnet::get_course_adv_roles($cdom.'/'.$cnum);
if ($target ne 'tex') {
- $r->print(&Apache::loncommon::start_data_table());
+ $r->print(&Apache::lonhtmlcommon::start_pick_box());
} else {
$r->print('\begin{tabular}{|p{0.45\textwidth}|p{0.45\textwidth}|}\hline');
}
foreach my $element (sort keys %coursepersonnel) {
if ($target ne 'tex') {
- $r->print(&Apache::loncommon::start_data_table_row().
- '
'.$element.' | ');
+ $r->print(&Apache::lonhtmlcommon::row_title($element));
} else {
$r->print(' '.&Apache::lonxml::xmlparse($r,'tex',$element).' & ');
}
@@ -198,8 +197,8 @@ ENDSCRIPT
($env{'user.domain'} eq '') || ($env{'user.domain'} eq 'public')) {
$r->print(' '.$courseperson);
} else {
- $r->print(' '.&Apache::loncommon::aboutmewrapper($courseperson),
- $puname,$pudom);
+ $r->print(' '.&Apache::loncommon::aboutmewrapper($courseperson,
+ $puname,$pudom));
}
} else {
$r->print(' '.&Apache::loncommon::plainname($puname,
@@ -207,13 +206,13 @@ ENDSCRIPT
}
}
if ($target ne 'tex') {
- $r->print(' | '.&Apache::loncommon::end_data_table_row());
+ $r->print(&Apache::lonhtmlcommon::row_closure());
} else {
$r->print('\\\\ \hline');
}
}
if ($target ne 'tex') {
- $r->print(&Apache::loncommon::end_data_table());
+ $r->print(&Apache::lonhtmlcommon::end_pick_box());
} else {
$r->print('\end{tabular}\\\\');
}
@@ -393,7 +392,7 @@ ENDSCRIPT
if ($target ne 'tex') {
if ($env{'form.backto'} eq 'coursecatalog') {
$r->print('');
}
$r->print(&Apache::loncommon::end_page());