--- db/prgsrc/db.cgi	2002/01/15 03:34:31	1.60
+++ db/prgsrc/db.cgi	2002/01/25 20:47:29	1.62
@@ -161,7 +161,7 @@ sub printform
   my $inputstring=textfield(-name=>'sstr',
                          -default=>param('sstr')||'',
                          -size=>30,
-                         -maxlength=>30);
+                         -maxlength=>50);
   my $qnumber="Выводить по".br. textfield(-name=>'kvo',
                          -default=>param('kvo')||'150',
                          -size=>3,
@@ -1009,9 +1009,9 @@ sub PrintField {
 	    $value =~ s/^\s+/<br>&nbsp;&nbsp;&nbsp;&nbsp;/mg;
 	    $value =~ s/^\|([^\n]*)/<pre>$1<\/pre>/mg;
 	    $value =~ s/\s+-+\s+/&nbsp;&#0150; /mg;
-	    $value =~ s/(\s)"/$1&#147;/mg;
-	    $value =~ s/^"/&#147;/mg;
-	    $value =~ s/"/&#148;/mg;
+#	    $value =~ s/(\s)"/$1&#147;/mg;
+#	    $value =~ s/^"/&#147;/mg;
+#	    $value =~ s/"/&#148;/mg;
 	}