Diff for /loncom/interface/lonsearchcat.pm between versions 1.94 and 1.95

version 1.94, 2001/04/13 18:09:15 version 1.95, 2001/04/16 17:11:57
Line 658  sub basicsearch { Line 658  sub basicsearch {
     my $query='';      my $query='';
     my $concatarg=join(',"    ",',      my $concatarg=join(',"    ",',
        ('title', 'author', 'subject', 'notes', 'abstract'));         ('title', 'author', 'subject', 'notes', 'abstract'));
 #    $query='select * from metadata where concat(' . $concatarg . ') like "%' .      $concatarg='title' if $ENV{'form.titleonly'};
 #   $ENV{'form.basicexp'} . '%"';  
   
     $query=&build_SQL_query('concat('.$concatarg.')',$ENV{'form.'.'basicexp'});      $query=&build_SQL_query('concat('.$concatarg.')',$ENV{'form.'.'basicexp'});
   

Removed from v.1.94  
changed lines
  Added in v.1.95


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