Add files via upload

AlisamTechnology · Jan 14, 2019 · 6bc4551 · 6bc4551
1 parent 3b25352
commit 6bc4551
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/inc/search/print.pl b/inc/search/print.pl
@@ -209,6 +209,7 @@ sub getValidationParts {
 sub checkValidation {
   my ($URL1, $status, $html, $response, $result)=@_;
   my $cV="";
+  if ($result) { $cV="1"; }
   if (defined $Hstatus) { if ($status eq $Hstatus) { $cV="1"; } }
   if (defined $validText) {
     my $validation_number = getValidationParts($html, \@validTexts, "1");