Changeset 261 for trunk/cgi-bin


Ignore:
Timestamp:
06/17/05 16:08:35 (20 years ago)
Author:
Kris Deugau
Message:

/trunk

Cleanup - remove unused function countRows() and unused
global $RESULTS_PER_PAGE

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/cgi-bin/main.cgi

    r256 r261  
    5050
    5151
    52 #prototypes
    53 # Needs rewrite/rename
    54 sub countRows($);       # returns first element of first row of passed SQL
    55                         # Only usage passes "select count(*) ..."
    56 
    5752# Global variables
    58 my $RESULTS_PER_PAGE = 50;
    5953my %webvar = parse_post();
    6054cleanInput(\%webvar);
     
    220214  print "</tr>\n";
    221215} # startTable
    222 
    223 
    224 # Return first element of passed SQL query
    225 sub countRows($) {
    226   my $sth = $ip_dbh->prepare($_[0]);
    227   $sth->execute();
    228   my @a = $sth->fetchrow_array();
    229   $sth->finish();
    230   return $a[0];
    231 }
    232216
    233217
Note: See TracChangeset for help on using the changeset viewer.