/[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.1 by dpavlin, Thu Jun 13 17:01:56 2002 UTC revision 1.2 by dpavlin, Sat Jun 15 17:37:32 2002 UTC
# Line 191  $main::MPSSession = 0; Line 191  $main::MPSSession = 0;
191          'mailer-application','/usr/lib/sendmail',          'mailer-application','/usr/lib/sendmail',
192          'server-log','mps.log',          'server-log','mps.log',
193          'output-colums','yes',          'output-colums','yes',
194            'show-nr-colums',3,
195  #       'show-past-date-list','yes',  #       'show-past-date-list','yes',
196          'database-for-SearchFieldDescriptions','ps',          'database-for-SearchFieldDescriptions','ps',
197  );  );
# Line 3131  sub vGetSearch { Line 3132  sub vGetSearch {
3132    
3133    
3134                  $Flag = 0;                  $Flag = 0;
3135                  print("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>\n");                  print("<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>\n");
3136    
3137                  my @html_database;                  my @html_database;
3138    
# Line 3150  sub vGetSearch { Line 3151  sub vGetSearch {
3151                  if ($main::ConfigurationData{'output-colums'}) {                  if ($main::ConfigurationData{'output-colums'}) {
3152                          # create database names in columns                          # create database names in columns
3153    
3154                          my $max = $#html_database+1 ;                          my $cols = $main::ConfigurationData{'show-nr-colums'};
3155                            my $next = int($#html_database/$cols) ;
3156    
3157                          my $j=0;                          for(my $i=0; $i <= $next ; $i++) {
3158                          for(my $i=0; $i < $max ; $i=$i+2) {                                  print("<tr>");
3159                                  print("<tr>",$html_database[$j],$html_database[$j+int($max/2)],"</tr>");                                  for(my $j=0; $j <= $cols; $j++) {
3160                                  $j++;                                          print($html_database[$i+$next*$j+$j]);
3161                                    }
3162                                    print("</tr>");
3163                          }                          }
3164    
3165                  } else {                  } else {
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.26