[BACK]Return to lonsql CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom

Diff for /loncom/lonsql between versions 1.84 and 1.86

version 1.84, 2007/08/08 22:24:36 version 1.86, 2007/08/25 19:52:11
Line 457  sub make_new_child { Line 457  sub make_new_child {
                 $query = "SELECT $fieldlist FROM allusers WHERE (domain = $quoted_dom AND ";                  $query = "SELECT $fieldlist FROM allusers WHERE (domain = $quoted_dom AND ";
                 if ($srchby eq 'lastfirst') {                  if ($srchby eq 'lastfirst') {
                     my ($fraglast,$fragfirst) = split(/,/,$srchterm);                      my ($fraglast,$fragfirst) = split(/,/,$srchterm);
                       $fragfirst =~ s/^\s+//;
                       $fraglast =~ s/\s+$//;
                     if ($srchtype eq 'exact') {                      if ($srchtype eq 'exact') {
                         $query .= 'lastname = '.$dbh->quote($fraglast).                          $query .= 'lastname = '.$dbh->quote($fraglast).
                                   ' AND firstname = '.$dbh->quote($fragfirst);                                    ' AND firstname = '.$dbh->quote($fragfirst);
                       } elsif ($srchtype eq 'begins') {
                           $query .= 'lastname LIKE '.$dbh->quote($fraglast.'%').' AND firstname LIKE '.$dbh->quote($fragfirst.'%');
                     } else {                      } else {
                         $query .= 'lastname LIKE '.$dbh->quote('%'.$fraglast.'%').' AND firstname LIKE '.$dbh->quote('%'.$fragfirst.'%');                          $query .= 'lastname LIKE '.$dbh->quote('%'.$fraglast.'%').' AND firstname LIKE '.$dbh->quote('%'.$fragfirst.'%');
                     }                      }
Line 470  sub make_new_child { Line 474  sub make_new_child {
                                     );                                      );
                     if ($srchtype eq 'exact') {                      if ($srchtype eq 'exact') {
                         $query .= $srchfield{$srchby}.' = '.$dbh->quote($srchterm);                          $query .= $srchfield{$srchby}.' = '.$dbh->quote($srchterm);
                       } elsif ($srchtype eq 'begins') {
                           $query .= $srchfield{$srchby}.' LIKE '.$dbh->quote($srchterm.'%');
                     } else {                      } else {
                         $query .= $srchfield{$srchby}.' LIKE '.$dbh->quote('%'.$srchterm.'%');                          $query .= $srchfield{$srchby}.' LIKE '.$dbh->quote('%'.$srchterm.'%');
                     }                      }
Removed from v.1.84  
changed lines
  Added in v.1.86

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>