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

foxr lon-capa-cvs@mail.lon-capa.org
Tue, 30 May 2006 21:48:00 -0000


foxr		Tue May 30 17:48:00 2006 EDT

  Modified files:              
    /loncom/interface	lonhelper.pm 
  Log:
  1. If necessary restrict student selection to those in the
     section for which the user has advanced roles.
  2. Revert the switch of &Apache::lonnet::escape -> escape back since
     there was no sub escape defined (yet?).
  
  
Index: loncom/interface/lonhelper.pm
diff -u loncom/interface/lonhelper.pm:1.152 loncom/interface/lonhelper.pm:1.153
--- loncom/interface/lonhelper.pm:1.152	Tue May 30 08:46:09 2006
+++ loncom/interface/lonhelper.pm	Tue May 30 17:48:00 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # .helper XML handler to implement the LON-CAPA helper
 #
-# $Id: lonhelper.pm,v 1.152 2006/05/30 12:46:09 www Exp $
+# $Id: lonhelper.pm,v 1.153 2006/05/30 21:48:00 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -471,8 +471,8 @@
     my $self = shift;
     my @vars = ();
     for my $key (keys %{$self->{VARS}}) {
-        push @vars, &escape($key) . '=' .
-            &escape($self->{VARS}->{$key});
+        push @vars, &Apache::lonnet::escape($key) . '=' .
+            &Apache::lonnet::escape($self->{VARS}->{$key});
     }
     return join ('&', @vars);
 }
@@ -2344,7 +2344,8 @@
     my ($course_personnel, 
 	$current_members, 
 	$expired_members, 
-	$future_members) = &Apache::lonselstudent::get_people_in_class();
+	$future_members) = 
+	    &Apache::lonselstudent::get_people_in_class($env{'request.course.sec'});