version 1.182, 2007/08/31 17:58:47
|
version 1.183, 2007/09/07 19:51:41
|
Line 2214 sub user_search_result {
|
Line 2214 sub user_search_result {
|
my %inst_matches; |
my %inst_matches; |
my %srch_results; |
my %srch_results; |
my ($response,$currstate,$forcenewuser,$dirsrchres); |
my ($response,$currstate,$forcenewuser,$dirsrchres); |
$srch->{'srchterm'} =~ s/^\s+//; |
$srch->{'srchterm'} =~ s/\s+/ /g; |
$srch->{'srchterm'} =~ s/\s+$//; |
|
|
|
if ($srch->{'srchby'} !~ /^(uname|lastname|lastfirst)$/) { |
if ($srch->{'srchby'} !~ /^(uname|lastname|lastfirst)$/) { |
$response = &mt('Invalid search.'); |
$response = &mt('Invalid search.'); |
} |
} |
Line 2229 sub user_search_result {
|
Line 2227 sub user_search_result {
|
if ($srch->{'srchterm'} eq '') { |
if ($srch->{'srchterm'} eq '') { |
$response = &mt('You must enter a search term.'); |
$response = &mt('You must enter a search term.'); |
} |
} |
|
if ($srch->{'srchterm'} =~ /^\s+$/) { |
|
$response = &mt('Your search term must contain more than just spaces.'); |
|
} |
if (($srch->{'srchin'} eq 'dom') || ($srch->{'srchin'} eq 'instd')) { |
if (($srch->{'srchin'} eq 'dom') || ($srch->{'srchin'} eq 'instd')) { |
if (($srch->{'srchdomain'} eq '') || |
if (($srch->{'srchdomain'} eq '') || |
! (&Apache::lonnet::domain($srch->{'srchdomain'}))) { |
! (&Apache::lonnet::domain($srch->{'srchdomain'}))) { |