| 3 |
# $Id$ |
# $Id$ |
| 4 |
# |
# |
| 5 |
# $Log$ |
# $Log$ |
| 6 |
|
# Revision 1.45 2003/12/14 01:48:36 jonen |
| 7 |
|
# small HACK at _insertChildNode: some special Childnodes should not be created because existing objects have to be selected! |
| 8 |
|
# TODO: make this more generic, e.g. implement a special flag at Schema |
| 9 |
|
# |
| 10 |
# Revision 1.44 2003/12/04 01:01:50 joko |
# Revision 1.44 2003/12/04 01:01:50 joko |
| 11 |
# + sendQuery now returns result even on crud=UPDATE |
# + sendQuery now returns result even on crud=UPDATE |
| 12 |
# |
# |
| 1024 |
$obj->{$_} = '0000-00-00 00:00:00'; |
$obj->{$_} = '0000-00-00 00:00:00'; |
| 1025 |
} elsif($attr_types->{$_} eq 'ref') { |
} elsif($attr_types->{$_} eq 'ref') { |
| 1026 |
if($attr_options->{$_}->{class}) { |
if($attr_options->{$_}->{class}) { |
| 1027 |
$obj->{$_} = $self->createNode($attr_options->{$_}->{class}); |
# HACK!!! |
| 1028 |
|
# STANDALONE Objects (objects which make sense to instanciat alone) should not created automaticly |
| 1029 |
|
# because they maybe exists and should only be SETTED not CREATED! |
| 1030 |
|
# TODO: Create a flag at the scheme for that reason! |
| 1031 |
|
# (e.g child_node => 1 for child-nodes only like e.g. UserData) |
| 1032 |
|
if($attr_options->{$_}->{class} eq 'NetPerson' || $attr_options->{$_}->{class} eq 'Event') { |
| 1033 |
|
#$obj->{$_} = undef(); |
| 1034 |
|
} else { |
| 1035 |
|
$obj->{$_} = $self->createNode($attr_options->{$_}->{class}); |
| 1036 |
|
} |
| 1037 |
} else { |
} else { |
| 1038 |
#$obj->{$_} = undef(); |
#$obj->{$_} = undef(); |
| 1039 |
} |
} |
Parent Directory
| 
Revision Log
| 
Patch
