| 2 |
## $Id$ |
## $Id$ |
| 3 |
## --------------------------------------------------------------------------- |
## --------------------------------------------------------------------------- |
| 4 |
## $Log$ |
## $Log$ |
| 5 |
|
## Revision 1.4 2003/05/13 09:10:50 joko |
| 6 |
|
## disabled debugging |
| 7 |
|
## |
| 8 |
## Revision 1.3 2003/04/11 01:06:44 joko |
## Revision 1.3 2003/04/11 01:06:44 joko |
| 9 |
## enhanced hash2sql: |
## enhanced hash2sql: |
| 10 |
## + revamped crud action tokenizer |
## + revamped crud action tokenizer |
| 129 |
$sql =~ s/#values#/$values/; |
$sql =~ s/#values#/$values/; |
| 130 |
$sql =~ s/#fields-values#/$fields_values/; |
$sql =~ s/#fields-values#/$fields_values/; |
| 131 |
|
|
| 132 |
print __PACKAGE__ . "::hash2sql: \$sql=$sql", "\n"; |
#print __PACKAGE__ . "::hash2sql: \$sql=$sql", "\n"; |
| 133 |
|
|
| 134 |
return $sql; |
return $sql; |
| 135 |
} |
} |