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

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 30 Mar 2006 05:13:38 -0000


albertel		Thu Mar 30 00:13:38 2006 EDT

  Modified files:              (Branch: version_2_1_X)
    /loncom/interface	slotrequest.pm 
  Log:
  - link looks better in the scheduabled students display area
  
  
Index: loncom/interface/slotrequest.pm
diff -u loncom/interface/slotrequest.pm:1.48.2.2 loncom/interface/slotrequest.pm:1.48.2.3
--- loncom/interface/slotrequest.pm:1.48.2.2	Wed Mar 29 23:37:22 2006
+++ loncom/interface/slotrequest.pm	Thu Mar 30 00:13:38 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.48.2.2 2006/03/30 04:37:22 albertel Exp $
+# $Id: slotrequest.pm,v 1.48.2.3 2006/03/30 05:13:38 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1084,14 +1084,15 @@
 <a href="/adm/slotrequest?command=delete&slotname=$slot">Delete</a>
 DELETELINK
 
-        my $remove_all=&remove_link($slot,'remove all');
+        my $remove_all=&remove_link($slot,'remove all').'<br />';
 
         if ($ids ne '') { undef($delete); }
-	if ($slots{$slot}{'type'} ne 'schedulable_student') { 
+	if ($slots{$slot}{'type'} ne 'schedulable_student' 
+	    || $ids eq '') { 
 	    undef($remove_all);
 	}
 
-        $r->print("<tr>\n<td rowspan=\"$rowspan\">$edit $delete $remove_all</td>\n");
+        $r->print("<tr>\n<td rowspan=\"$rowspan\">$edit $delete</td>\n");
 	if (exists($show{'name'})) {
 	    $colspan++;$r->print("<td>$slot</td>");
 	}
@@ -1126,7 +1127,7 @@
 	    $colspan++;$r->print("<td>$unique</td>\n");
 	}
 	if (exists($show{'scheduled'})) {
-	    $colspan++;$r->print("<td>$ids</td>\n</tr>\n");
+	    $colspan++;$r->print("<td>$remove_all $ids</td>\n</tr>\n");
 	}
 	if (exists($show{'proctor'})) {
 	    $r->print(<<STUFF);