[LON-CAPA-cvs] cvs: loncom /interface slotrequest.pm

[albertel]

albertel		Fri Jun 16 15:54:05 2006 EDT

  Modified files:              
    /loncom/interface	slotrequest.pm 
  Log:
  - databling
  
  
Index: loncom/interface/slotrequest.pm
diff -u loncom/interface/slotrequest.pm:1.64 loncom/interface/slotrequest.pm:1.65
--- loncom/interface/slotrequest.pm:1.64	Fri Jun 16 15:49:00 2006
+++ loncom/interface/slotrequest.pm	Fri Jun 16 15:54:02 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler for requesting to have slots added to a students record
 #
-# $Id: slotrequest.pm,v 1.64 2006/06/16 19:49:00 albertel Exp $
+# $Id: slotrequest.pm,v 1.65 2006/06/16 19:54:02 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1031,14 +1031,15 @@
     $r->print('</div>');
     $r->print('<p><input type="submit" name="start" value="'.&mt('Update Display').'" /></p>');
     my $linkstart='<a href="/adm/slotrequest?command=showslots&amp;order=';
-    $r->print('<table class="thinborder">
-<tr>
-  <th></th>');
+    $r->print(&Apache::loncommon::start_data_table().
+	      &Apache::loncommon::start_data_table_header_row().'
+	       <th></th>');
     foreach my $which (@show_order) {
 	if ($which ne 'proctor' && exists($show{$which})) {
 	    $r->print('<th>'.$linkstart.$which.'">'.$show_fields{$which}.'</a></th>');
 	}
     }
+    $r->print(&Apache::loncommon::end_data_table_header_row());
 
     my %name_cache;
     my $slotsort = sub {
@@ -1180,7 +1181,10 @@
 	    undef($remove_all);
 	}
 
-        $r->print("<tr>\n<td rowspan=\"$rowspan\">$edit $delete</td>\n");
+	my $row_start=&Apache::loncommon::start_data_table_row();
+	my $row_end=&Apache::loncommon::end_data_table_row();
+        $r->print($row_start.
+		  "\n<td rowspan=\"$rowspan\">$edit $delete</td>\n");
 	if (exists($show{'name'})) {
 	    $colspan++;$r->print("<td>$slot</td>");
 	}
@@ -1223,12 +1227,12 @@
 	if (exists($show{'scheduled'})) {
 	    $colspan++;$r->print("<td>$remove_all $ids</td>\n");
 	}
-	$r->print("</tr>\n");
+	$r->print("$row_end\n");
 	if (exists($show{'proctor'})) {
 	    $r->print(<<STUFF);
-<tr>
+$row_start
  <td colspan="$colspan">$proctors</td>
-</tr>
+$row_end
 STUFF
         }
     }