[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);