/[webpac-proto]/search/Search.cgi
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /search/Search.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.22 by dpavlin, Tue Jul 2 17:18:43 2002 UTC revision 1.23 by dpavlin, Wed Jul 17 16:55:07 2002 UTC
# Line 3035  sub vGetSearch { Line 3035  sub vGetSearch {
3035                          } elsif ($i == ($field - 1)) {                          } elsif ($i == ($field - 1)) {
3036                                  $Selected = "SELECTED";                                  $Selected = "SELECTED";
3037                          }                          }
                                   
3038                          print("<OPTION VALUE=\"$ItemEntry\" $Selected> $main::SearchFieldDescriptions{$ItemEntry}\n");                          print("<OPTION VALUE=\"$ItemEntry\" $Selected> $main::SearchFieldDescriptions{$ItemEntry}\n");
3039                  }                  }
3040                  my $Value = "";                  my $Value = "";
# Line 7380  sub fill_SearchFieldDescriptions_fromDB Line 7379  sub fill_SearchFieldDescriptions_fromDB
7379                          my ($FieldName, $FieldDescription, undef) = split(/\t/, $FieldInformation, 3);                          my ($FieldName, $FieldDescription, undef) = split(/\t/, $FieldInformation, 3);
7380                          $main::SearchFieldDescriptions{$FieldName} = $FieldDescription;                          $main::SearchFieldDescriptions{$FieldName} = $FieldDescription;
7381                  }                  }
7382            } else {
7383                    &vLog("Error - cant read database description from '$Database'\n");
7384          }          }
7385  }  }
7386    

Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23

  ViewVC Help
Powered by ViewVC 1.1.26