[LON-CAPA-cvs] cvs: loncom /interface lonsyllabus.pm
bisitz
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 22 Oct 2008 08:56:36 -0000
bisitz Wed Oct 22 04:56:36 2008 EDT
Modified files:
/loncom/interface lonsyllabus.pm
Log:
Replaced data_table with pick_box for course personnel list
Still to do:
Find a simple way to close the last row in a different way: "(1)" instead of "()"
Index: loncom/interface/lonsyllabus.pm
diff -u loncom/interface/lonsyllabus.pm:1.67 loncom/interface/lonsyllabus.pm:1.68
--- loncom/interface/lonsyllabus.pm:1.67 Mon Aug 25 10:50:01 2008
+++ loncom/interface/lonsyllabus.pm Wed Oct 22 04:56:35 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Syllabus
#
-# $Id: lonsyllabus.pm,v 1.67 2008/08/25 14:50:01 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 @@
# -------------------------------------------------------- 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().
- '<td>'.$element.'</td><td>');
+ $r->print(&Apache::lonhtmlcommon::row_title($element));
} else {
$r->print(' '.&Apache::lonxml::xmlparse($r,'tex',$element).' & ');
}
@@ -207,13 +206,13 @@
}
}
if ($target ne 'tex') {
- $r->print('</td>'.&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}\\\\');
}