/[webpac]/trunk/index_DBI.pm
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 /trunk/index_DBI.pm

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

revision 28 by dpavlin, Sun Feb 23 07:07:33 2003 UTC revision 37 by dpavlin, Sat Mar 15 19:37:07 2003 UTC
# Line 137  sub fetch { Line 137  sub fetch {
137          $sth->execute() || die "execute: $sql; ".$self->{dbh}->errstr();          $sth->execute() || die "execute: $sql; ".$self->{dbh}->errstr();
138          my @arr;          my @arr;
139          while (my $row = $sth->fetchrow_hashref) {          while (my $row = $sth->fetchrow_hashref) {
140                  $row->{item} = HTML::Entities::encode($row->{item});                  $row->{item} = HTML::Entities::encode($row->{item},'<>&"');
141                  push @arr,$row;                  push @arr,$row;
142          }          }
143          return @arr;          return @arr;

Legend:
Removed from v.28  
changed lines
  Added in v.37

  ViewVC Help
Powered by ViewVC 1.1.26