better debug
This commit is contained in:
parent
d341a9506a
commit
5a182e5971
1 changed files with 1 additions and 1 deletions
|
|
@ -842,7 +842,7 @@ $replace{'t'} = {
|
|||
my ($sth, $data, $code, $table, $column, %identifier);
|
||||
foreach $table (keys %dbFields){
|
||||
$sth = WebGUI::SQL->read("SELECT * FROM $table ");
|
||||
die "Cannot read from table $table " if ($!);
|
||||
die "Cannot read from table $table ".$! if ($!);
|
||||
while ($data = $sth->hashRef){
|
||||
foreach $column (@{$dbFields{$table}{fields}}){
|
||||
$code = $data->{$column};
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue