--- loncom/interface/lonrequestcourse.pm 2009/09/05 20:24:15 1.28
+++ loncom/interface/lonrequestcourse.pm 2009/09/06 19:09:54 1.29
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Request a course
#
-# $Id: lonrequestcourse.pm,v 1.28 2009/09/05 20:24:15 raeburn Exp $
+# $Id: lonrequestcourse.pm,v 1.29 2009/09/06 19:09:54 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1252,7 +1252,6 @@ sub print_personnel_menu {
if ($env{'form.addperson'}) {
$persontotal ++;
}
- my $userlinktxt = &mt('Set User');
my @items = ('uname','dom','lastname','firstname','emailaddr','hidedom');
my $roleoptions;
@@ -1311,16 +1310,12 @@ sub print_personnel_menu {
for (my $i=0; $i<$persontotal; $i++) {
my @linkargs = map { 'person_'.$i.'_'.$_ } (@items);
my $linkargstr = join("','",@linkargs);
- my $userlink = &Apache::loncommon::selectuser_link($formname,@linkargs,$dom,$userlinktxt);
- my $uname_form = '';
+ my $uname_form = '';
my $onchange = 'javascript:fix_domain('."'$formname','person_".$i."_dom',".
- "'person_".$i."_hidedom'".');'.
- 'openuserbrowser('."'$formname','$linkargstr','$dom'".');';
+ "'person_".$i."_hidedom','person_".$i."_uname'".');';
my $udom_form = &Apache::loncommon::select_dom_form($dom,'person_'.$i.'_dom','',
1,$onchange).
- '';
+ '';
my %form_elems;
foreach my $item (@items) {
next if (($item eq 'dom') || ($item eq 'uname') || ($item eq 'hidedom'));
@@ -1336,12 +1331,19 @@ sub print_personnel_menu {
}
$sectionselector .= $newtitle.
''."\n";
+ my $usersrchlinktxt = &mt('Search for user');
+ my $usersrchlink = &Apache::loncommon::selectuser_link($formname,@linkargs,$dom,
+ $usersrchlinktxt);
+ my $userchklinktxt = &mt('Check username');
+ my $userchklink = &Apache::loncommon::selectuser_link($formname,@linkargs,$dom,
+ $userchklinktxt,'checkusername');
$output .=
- &Apache::lonhtmlcommon::row_title(&mt('Additional Personnel').'
'.
- ''.$userlink.
- '').
- '
'.&mt('Username').' '.$uname_form.' | '."\n".
- ''.&mt('Domain').' '.$udom_form.' | ||||
'.$usersrchlink.' | '."\n". + ''.
+ &mt('Username').': '.$uname_form.' '.$userchklink.' '."\n". + ''.&mt('Domain').': '.$udom_form.' | '.
+ '|
'.&mt('First Name').' '.$form_elems{'firstname'}.' | '."\n".
''.&mt('Last Name').' '.$form_elems{'lastname'}.' | '."\n".
''.&mt('E-mail').' '.$form_elems{'emailaddr'}.' |