[LON-CAPA-cvs] cvs: loncom /html/adm/helper newslot.helper

albertel lon-capa-cvs@mail.lon-capa.org
Wed, 02 Nov 2005 21:58:14 -0000


albertel		Wed Nov  2 16:58:14 2005 EDT

  Modified files:              
    /loncom/html/adm/helper	newslot.helper 
  Log:
  - makes the display of the proctor list looks better
  
  
Index: loncom/html/adm/helper/newslot.helper
diff -u loncom/html/adm/helper/newslot.helper:1.5 loncom/html/adm/helper/newslot.helper:1.6
--- loncom/html/adm/helper/newslot.helper:1.5	Mon Oct 17 17:19:30 2005
+++ loncom/html/adm/helper/newslot.helper	Wed Nov  2 16:58:14 2005
@@ -231,13 +231,18 @@
                  "\n".'<li> Type: '.$slot{'type'}.'</li>';
         my %labels =
              map {($_->[0],$_->[1])} &Apache::slotrequest::csvupload_fields();
-        foreach my $which ('ip','proctor','description','maxspace',
-			   'secret','symb') {
+        foreach my $which ('ip','description','maxspace','secret','symb') {
 	    if (exists($slot{$which})) {
 		$result.="\n".'<li> '.$labels{$which}.': '.
 		    &HTML::Entities::encode($slot{$which}).'</li>';
 	    }
 	}
+        if (exists($slot{'proctor'})) {
+	    my $proctors = $slot{'proctor'};
+	    $proctors =~ s/,/, /g;
+	    $result.="\n".'<li> '.$labels{'proctor'}.': '.
+		&HTML::Entities::encode($proctors).'</li>';
+	}
         if (exists($slot{'uniqueperiod'})) {
 	    $result.=
                  "\n".'<li> '.$labels{'uniqueperiod'}.': '.