2 |
## $Id$ |
## $Id$ |
3 |
## --------------------------------------------------------------------------- |
## --------------------------------------------------------------------------- |
4 |
## $Log$ |
## $Log$ |
5 |
|
## Revision 1.16 2003/03/27 15:04:52 joko |
6 |
|
## minor update: comment |
7 |
|
## |
8 |
|
## Revision 1.15 2003/02/27 14:39:48 jonen |
9 |
|
## + fixed bug at _hash2object() |
10 |
|
## |
11 |
## Revision 1.14 2003/02/22 17:13:55 jonen |
## Revision 1.14 2003/02/22 17:13:55 jonen |
12 |
## + added function 'childObject2string()' to encode 'child'-references to option related string |
## + added function 'childObject2string()' to encode 'child'-references to option related string |
13 |
## + use new option at 'expand()' for replacing 'childObject2string' |
## + use new option at 'expand()' for replacing 'childObject2string' |
294 |
sub merge_to { |
sub merge_to { |
295 |
_hash2object(@_); |
_hash2object(@_); |
296 |
# TODO: |
# TODO: |
297 |
# re-implement using CPAN's "Iterate". |
# re-implement using CPAN's "Iterate" and/or a modified Hash::Merge. |
298 |
} |
} |
299 |
|
|
300 |
|
|
311 |
numhash2list($data) if ($options->{php}); |
numhash2list($data) if ($options->{php}); |
312 |
|
|
313 |
# utf8-conversion/-encoding (essential for I18N) |
# utf8-conversion/-encoding (essential for I18N) |
314 |
var_utf2iso($data) if ($options->{utf8}); |
utf8_to_latin($data) if ($options->{utf8}); |
315 |
|
|
316 |
# get fresh object from database |
# get fresh object from database |
317 |
# todo: |
# todo: |