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

raeburn raeburn@source.lon-capa.org
Thu, 27 Aug 2009 13:01:00 -0000


raeburn		Thu Aug 27 13:01:00 2009 EDT

  Modified files:              
    /loncom/interface	loncreateuser.pm 
  Log:
  - Exact search by username (when used in lonpickuser.pm) requires population of the results hash. 
  
  
Index: loncom/interface/loncreateuser.pm
diff -u loncom/interface/loncreateuser.pm:1.309 loncom/interface/loncreateuser.pm:1.310
--- loncom/interface/loncreateuser.pm:1.309	Sat Aug 22 21:09:46 2009
+++ loncom/interface/loncreateuser.pm	Thu Aug 27 13:00:59 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.309 2009/08/22 21:09:46 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.310 2009/08/27 13:00:59 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5235,6 +5235,15 @@
                                 &build_search_response($context,$srch,%srch_results);
                         } else {
                             $currstate = 'modify';
+                            my $uname = $srch->{'srchterm'};
+                            my $udom = $srch->{'srchdomain'};
+                            $srch_results{$uname.':'.$udom} =
+                                { &Apache::lonnet::get('environment',
+                                                       ['firstname',
+                                                        'lastname',
+                                                        'permanentemail'],
+                                                         $udom,$uname)
+                                };
                         }
                     } else {
                         %srch_results = &Apache::lonnet::usersearch($srch);