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 |
} |
} |