--- db/prgsrc/db.cgi	2002/10/06 08:58:12	1.74
+++ db/prgsrc/db.cgi	2002/10/06 23:12:22	1.75
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 
-use DBI;
+use  DBI;
 use CGI ':all';
 use strict;
 use Time::Local;
@@ -533,7 +533,9 @@ sub Search {
 	  for $i (0 .. $#sar) {
 		$sar[$i] = $dbh->quote("%${sar[$i]}%");
 	  }
-
+	  $_.=' ' foreach (@fields); # Это чтобы последнее слово поля
+	                             # не сливалось с первым словом
+	                             # следующего поля, R7
 	  my($f) = "CONCAT(" . join(',', @fields) . ")";
 	  if (param('all') eq 'yes') {
 		$sstr = join " AND $f LIKE ", @sar;