--- loncom/interface/loncoursegroups.pm	2006/07/07 19:17:19	1.42
+++ loncom/interface/loncoursegroups.pm	2006/07/07 19:34:20	1.43
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: loncoursegroups.pm,v 1.42 2006/07/07 19:17:19 albertel Exp $
+# $Id: loncoursegroups.pm,v 1.43 2006/07/07 19:34:20 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1688,33 +1688,31 @@ sub pick_new_members {
         }
         $r->print('</tr></table>
         ');
-        $r->print(&Apache::loncommon::start_data_table());
+        $r->print(&Apache::loncommon::start_data_table().
+		  &Apache::loncommon::start_data_table_header_row());
         $r->print('
-   <table border="0" cellpadding="4" cellspacing="1">
-    <tr bgcolor="'.$tabcol.'" align="center">
-     <td><b>'.&mt('Add?').'</b></td>
-     <td><b><a href="javascript:changeSort('."'fullname'".')">'.&mt('Name').'</a></b></td>
-     <td><b><a href="javascript:changeSort('."'username'".')">'.&mt('Username').'</a></b>
-     </td>
-     <td><b><a href="javascript:changeSort('."'domain'".')">'.&mt('Domain').'</a></b></td>
-     <td><b><a href="javascript:changeSort('."'id'".')">ID</a></b></td>
-     <td><b><a href="javascript:changeSort('."'section'".')">Section</a></b></td>
+     <th>'.&mt('Add?').'</b></td>
+     <th><a href="javascript:changeSort('."'fullname'".')">'.&mt('Name').'</a></td>
+     <th><a href="javascript:changeSort('."'username'".')">'.&mt('Username').'</a></td>
+     <th><a href="javascript:changeSort('."'domain'".')">'.&mt('Domain').'</a></td>
+     <th><a href="javascript:changeSort('."'id'".')">'.&mt('ID').'</a></td>
+     <th><a href="javascript:changeSort('."'section'".')">'.&mt('Section').'</a></td>
 ');
         if (@{$available} > 0) {
-            $r->print('<td><b>'.$lt{'func'}.'</b></td>');
+            $r->print('<th>'.$lt{'func'}.'</th>');
         }
-        $r->print('</tr>');
+        $r->print(&Apache::loncommon::end_data_table_header_row());
         if (@{$available} > 0) {
             if ($granularity eq 'Yes') {
-                $r->print('<tr bgcolor="#cccccc">
+                $r->print(&Apache::loncommon::start_data_table_row('LC_data_table_dense LC_data_table_highlight').'
  <td colspan="6">&nbsp;</td>
- <td align="center"><small><nobr><b>'.&mt('All:').'</b>&nbsp;');
+ <td align="center"><nobr><b>'.&mt('All:').'</b>&nbsp;');
                 foreach my $tool (@{$available}) {
                     $r->print('<label><input type="checkbox" name="togglefunc" '.
    'onclick="javascript:toggleTools(document.'.$formname.'.user_'.$tool.',this);"'.
    ' value="'.$tool.'">'.'<b>'.$tool.'</b></label>&nbsp;&nbsp;&nbsp;');
                 }
-                $r->print('</nobr></small></td></tr>');
+                $r->print('</nobr></td></tr>');
             }
         }
         my %Sortby = ();
@@ -1733,27 +1731,22 @@ sub pick_new_members {
                 push(@{$Sortby{$members{$user}[$$idx{fullname}]}},$user);
             }
         }
-        my $rowNum = 0;
-        my $rowColor;
         foreach my $key (sort(keys(%Sortby))) {
             foreach my $user (@{$Sortby{$key}}) {
-                if ($rowNum %2 == 1) {
-                    $rowColor = $rowColor1;
-                } else {
-                    $rowColor = $rowColor2;
-                }
                 my $id = $members{$user}[$$idx{id}];
                 my $fullname = $members{$user}[$$idx{fullname}];
                 my $udom = $members{$user}[$$idx{udom}];
                 my $uname = $members{$user}[$$idx{uname}];
                 my $section = $members{$user}[$$idx{section}];
-                $r->print('<tr bgcolor="'.$rowColor.'"><td align="right">
-   <input type="checkbox" name="member" value="'.$user.'" /></td><td><small>'.
-    $fullname.'</small></td><td><small>'.$uname.'</small></td><td><small>'.
-    $udom.'</small></td><td><small>'.$id.'</small></td>'.
-			  '<td><small>'.$section.'</small></td>');
+                $r->print(&Apache::loncommon::start_data_table_row('LC_data_table_dense').
+			  '<td align="right"><input type="checkbox" name="member" value="'.$user.'" /></td>'.
+			  '<td>'.$fullname.'</td>'.
+			  '<td>'.$uname.'</td>'.
+			  '<td>'.$udom.'</td>'.
+			  '<td>'.$id.'</td>'.
+			  '<td>'.$section.'</td>');
                 if (@{$available} > 0) {
-                    $r->print('<td align="center"><nobr><small>'.
+                    $r->print('<td align="center"><nobr>'.
                               '&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;');
                     foreach my $tool (@{$available}) {
                         if ($granularity eq 'Yes') {
@@ -1764,13 +1757,12 @@ sub pick_new_members {
                           $tool.'" value="'.$user.'" />'.$tool.'&nbsp;&nbsp;&nbsp;');
                         }
                     }
-                    $r->print('</small></nobr></td>');
+                    $r->print('</nobr></td>');
                 }
-                $r->print('</tr>'."\n");
-                $rowNum ++;
+                $r->print(&Apache::loncommon::end_data_table_row()."\n");
             }
         }
-        $r->print(&Apache::lonhtmlcommon::end_pick_box());
+        $r->print(&Apache::loncommon::end_data_table());
     } else {
         if ($totalusers > 0) {
             $r->print($lt{'nnew'}.'<br /><br />'.$lt{'yoma'});
@@ -2596,9 +2588,6 @@ sub member_privileges_form {
                 my %total;
                 if (keys(%{$usertools}) > 1) {
                     $r->print('
- <tr>
-  <td>&nbsp;</td>
-  <td colspan="3">
    <table border="0" cellspacing="2" cellpadding="2" border="0">
     <tr>
 ');
@@ -2663,30 +2652,22 @@ END
                                       \@excluded);
                 $r->print('</td>');
                 $r->print(&Apache::lonhtmlcommon::end_pick_box());
-                $r->print('</td></tr>
- <tr>
-  <td colspan="4">&nbsp;</td>
- </tr>
-');
             } else {
-                $r->print('<tr><td>&nbsp;</td><td colspan="3">'.$lt{'forf'}.
-                          '<br />');
+                $r->print($lt{'forf'}.'<br />');
                 &display_defprivs($r,$tabcol,$rowColor1,$rowColor2,$tools,
                             $toolprivs,\@defprivs);
             }
         } else {
             if (keys(%{$usertools}) > 0) {
-                $r->print('<tr><td>&nbsp;</td><td colspan="3">'.$lt{'algr'}.
-                          '<br /><br />');
+                $r->print($lt{'algr'}.'<br /><br />');
                 &display_defprivs($r,$tabcol,$rowColor1,$rowColor2,$tools,
                             $toolprivs,\@defprivs);
             } else {
-                $r->print('<tr><td>&nbsp;</td><td colspan="3">'.$lt{'asno'}.
-                          '<br />');
+                $r->print($lt{'asno'}.'<br />');
             }
         }
     } else {
-        $r->print('<tr><td>&nbsp;</td><td colspan="3">'.$lt{'asng'});
+        $r->print($lt{'asng'});
     }
     return $numchgs;
 }