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

[albertel]

albertel		Tue Sep 13 04:12:07 2005 EDT

  Modified files:              
    /loncom/interface	slotrequest.pm 
  Log:
  - need to pass mgr around a bit more
  
  
Index: loncom/interface/slotrequest.pm
diff -u loncom/interface/slotrequest.pm:1.17 loncom/interface/slotrequest.pm:1.18
--- loncom/interface/slotrequest.pm:1.17	Tue Sep 13 03:56:03 2005
+++ loncom/interface/slotrequest.pm	Tue Sep 13 04:12:03 2005
@@ -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.17 2005/09/13 07:56:03 albertel Exp $
+# $Id: slotrequest.pm,v 1.18 2005/09/13 08:12:03 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -691,7 +691,7 @@
 }
 
 sub csv_upload_assign {
-    my ($r,$symb)= @_;
+    my ($r,$symb,$mgr)= @_;
     &Apache::loncommon::load_tmp_file($r);
     my @slotdata = &Apache::loncommon::upfile_record_sep();
     if ($env{'form.noFirstLine'}) { shift(@slotdata); }
@@ -736,7 +736,7 @@
     }
     $r->print("<br />Created $countdone slots\n");
     $r->print("<br />\n");
-    &show_table($r,$symb);
+    &show_table($r,$symb,$mgr);
     return '';
 }
 
@@ -762,7 +762,7 @@
 	&csv_upload_map($r,$symb);
     } elsif ($env{'form.command'} eq 'csvuploadassign' && $mgr eq 'F') {
 	if ($env{'form.associate'} ne 'Reverse Association') {
-	    &csv_upload_assign($r,$symb);
+	    &csv_upload_assign($r,$symb,$mgr);
 	} else {
 	    if ( $env{'form.upfile_associate'} ne 'reverse' ) {
 		$env{'form.upfile_associate'} = 'reverse';